Workbook_BeforeClose()

24/11/2007 - 14:25 von Helge Haensel | Report spam
Hallo NG!
WindowsXP/HE SP2, OfficeXP/Pro SP3, VB5EE/SP3, FreePDF 3.24

Im Ordner 'DieseArbeitsmappe':
Private Sub workbook_beforeclose()
Range("A2").Select
Selection.AutoFilter Field:=1, Criteria1:="1"
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

Fehler beim Kompilieren:
Deklaration der Prozedur entspricht nicht der Beschreibung eines
Ereignisses oder einer Prozedur mit dem selben Namen.

Kann mir bitte jemand helfen?
Danke!
Vy 73! Helge
Helge, DJ1WM
No eMails please
 

Lesen sie die antworten

#1 tom7263
24/11/2007 - 14:34 | Warnen spam
hallo helge

in der ersten zeile fehlt noch was

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Range("A2").Select
Selection.AutoFilter Field:=1, Criteria1:="1"
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

mfg tom

Ähnliche fragen