VBRunning
Function InRunMode(VBInst As VBIDE.VBE) As Boolean InRunMode = (VBInst.CommandBars("Run").Controls("End").Enabled = True) End Function
Function InRunMode(VBInst As VBIDE.VBE) As Boolean
InRunMode = (VBInst.CommandBars("Run").Controls("End").Enabled = True)
End Function
(vbrunning.html)- by Paolo Puglisi - Modifica del 25/3/2019