Slowing Down And Waiting For Data Results Using VBA?

I have 2 sheets in a workbook

My VBA code gets data from a cell in sheet1 Then it paste that into a cell on sheet2 sheet 2 processes some data and produces a single cell result based on the pasted data Then that single cell result is pasted back into sheet1

Here is the problem. Sheet 2 takes a up to one second to produce the final result because it has to fetch some data from the web My code is pasting data back to sheet1 before sheet2 has had time to produce a final result

How can I make sure the data is finished on sheet2 before my code paste the result back to sheet1?

The variable MacdBlack is the being pasted back to sheet1 before sheet2 has had time to update it This is because sheet2 has to get data from the web which is slow

VB:
Sub SheetTest()
Dim x As Integer
Dim StartCell1 As String

[Code]....