Entwicklungsumgebung ein/aus
10.03.2008 22:31:00
ioannis
um den Zugriff auf die Entwicklungsumgebung zu unterbinden, habe ich folgenden Code benutzt (Index 166202)
ClassModule: DieseArbeitsmappe
Private Sub Workbook_BeforeClose(Cancel As Boolean)
LockWindowUpdate 0&
End Sub
Private Sub Workbook_Open()
LockWindowUpdate Application.VBE.MainWindow.HWnd
End Sub
StandardModule: Modul1
Declare Function LockWindowUpdate Lib "user32" (ByVal hwndLock As Long) As Long
... bekomme ich aber die Meldung "Der programmatische Zugriff auf das Visual Basic-Projekt ist nicht sicher"
Wenn die Entwicklungsumgebung schon geöffnet ist, soll sie auf dieser Weise wieder schliessen?
Vielen Dank in Voraus.
Freundliche Grüsse
Ioannis