Abfrage vor Schliessen von Mappe

Forumthread: Abfrage vor Schliessen von Mappe

13.01.2005 16:54:43

Marcel

Ich möchte beim Schliessen einer Mappe eine Abfrage erstellen, welche bei Ja das Schliessen und Speichern der Mappe veranlasst, bei Nein im aktiven Registerblatt in eine bestimmte Spalte springt. Danke für die Hilfe!

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Abfrage vor Schliessen von Mappe

13.01.2005 17:29:18

Josef Ehrensberger

AW: Abfrage vor Schliessen von Mappe

13.01.2005 17:29:18

Josef Ehrensberger

Hallo

Gruß Sepp

Das geht zB. so:


Private Sub Workbook_BeforeClose(Cancel As Boolean)
If MsgBox("Wollen sie diese Mappe schließen?", vbYesNo + vbQuestion, _
"Frage") = vbNo Then
Cancel = True
ActiveSheet.Range("A1").Select   'Zelladresse anpassen
Exit Sub
Else
Me.Save
End If
End Sub

Gruß Sepp

Forumthread: Abfrage vor Schliessen von Mappe

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread