简体   繁体   中英

Pause to run third-party add-on

I broke a macro into 2 parts so that it could pause and use a third-party add-on to look up stock symbol descriptions. Some tickers don't have descriptions and the add-on returns "NTFND" if this is the case. I can find an alternate description for those securities but I need the formulas from the add-on to run to identify them. This works if I run Step1 and then Step2 separately.

Sub Macro1()

Application.ScreenUpdating = False

Call Step1 'enters info from holdings sheet including ticker symbols

Application.Calculate

Call Step2 'fixes all the "Not Found" descriptions

Application.ScreenUpdating = True

End Sub

I tried the calculate function but it doesn't seem to calculate for the third-party add-on formulas. Is there another way I can have my Macro pause until the description formulas have run?

I just tried

Application.Wait (Now + TimeValue("00:00:05"))

and

If Not Application.CalculationState = xlDone Then DoEvents End If

Neither worked.

Application.Wait will indeed pause (for 5 sec in this case) until the next line of code being execute.

This might be what you are looking for:

cpearson.com/excel/ShellAndWait.aspx

The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM