Sub Main
t1=Timer
strMacroDir = "C:\Program Files\Gyronix\ResultManager"
Call MacroRun(strMacroDir & "\ResultManager-X5.MMBas", "/Dashboard")
d=Timer-t1
Debug.Print d
End Sub