Hallo Gast32321
ich öffne eine leere Arbeitsmappe und gebe bei "Diese Arbeitsmappe" ein:
Option Explicit
Public WithEvents appExcel As Excel.Application
Private Sub appExcel_NewWorkbook()
Debug.Print "appExcel_NewWorkbook"
End Sub
Private Sub appExcel_SheetActivate(ByVal Sh As Object)
Debug.Print "appExcel_SheetActivate"
End Sub
Private Sub appExcel_WindowResize(ByVal Wb As Workbook, ByVal Wn As Window)
Debug.Print "appExcel_WindowResize"
End Sub
Jetzt war es kein schönes Wochenende weil es nicht funktioniert.
Erwartet hätte ich, dass im Direktfenster der Debug.Print auftaucht.
Es ist nichts passiert, also mache ich was Grundlegendes falsch.
Könntest Du mir bitte einen Hinweis geben.
VG Manfred Gast
|