Pause Macro until calculations are finished

[jcwords54]

I have a complex model that takes varying times to calculate depending on the inputs. I am trying to run a macro to loop through my process until a specific paramater is met. Unfortunately, the macro proceeds to the subsequent steps before the spreadsheet is done calculating from the previous steps. I have tried using the "Application.Wait Now + TimeSerial(0, 1, 0)" for varying times but this is inefficient and unreliable. Is there a way to make the macro pause until the spreadsheet is done calculating before it moves onto the next step in the macro?

Thanks for your help.

 

[VoG]

Perhaps like this

Do Until Application.CalculationState = xlDone
    DoEvents
Loop