IDE 상태에서 실행중인지 확인

첫번째 방법)

Option Explicit

Private Sub Form_Load()
   Debug.Print RunningIDE
End Sub

Private Function RunningIDE() As Boolean
    Debug.Assert Not TestIDE(RunningIDE)
End Function

Private Function TestIDE(Test As Boolean) As Boolean
    Test = True
End Function

두번째 방법)

Public Function RunningCompiledCode() As Boolean
   On Error Resume Next
   Debug.Print 1 / 0
   RunningCompiledCode = (Err.Number = 0)
   Err.Clear
End Function