Private Sub Form_Load()

Dim Msg
If InDesign = True Then
Msg = "Designläge"
Else
Msg = "Stand-Alone läge"
End If

MsgBox "Jag kör programmet i " & msg

End Sub