Brauchen Sie Hilfe?
Web:     Online-Formular
E-Mail:  
Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!
Tel:       +49(0)151 / 164 55 914

Nutzen Sie für Ihre Anfrage unser Online-Formular oder senden Sie uns eine E-Mail an Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!. Gerne können Sie aber auch direkt telefonisch Kontakt aufnehmen.

   
     Referenzen
 Bosch 
  T-Systems
  Hagebau
  Siemens
 Areva  VW
 Haufe-Lexware  British American Tobacco
  nagel group farbe
   

Programmverzweigung beim Schließen der Arbeitsmappe

103003


Diese Makro frägt nach, ob die Arbeitsmappe gespeichert werden soll.

Bei 'Ja' wird die Arbeitsmappe gespeichert und geschlossen

Bei "Nein' kann ein entsprechender Code ausgeführt werden, der ins Makro "Nein" geschrieben werden muss.
Bei "Abbruch" kann ebenso ein beliebiger Code ausgeführt werden, der ins Makro "Abbruch" geschrieben wird.


Sub Arbeitsmappe_schliessen()
Dim Antwort%
Dim Frage As String
Msg = "Wollen Sie die Arbeitsmappe schließen?"
Select Case MsgBox(Msg, vbInformation + vbYesNoCancel)
Case vbYes: ActiveWorkbook.Close savechanges:=True
'Schließen und Speichern bei Ja
Case vbNo: Call Nein 'Makroaufruf bei Nein
Case vbCancel: Call Abbruch 'Makroaufruf bei Abbrechen
End Select
End Sub

Public Sub Nein()
'Dieser Code wird ausgeführt, wenn 'Nein' gedrückt wird
MsgBox "Es wurde Nein gedrückt"
End Sub

Public Sub Abbruch()

'Dieser Code wird ausgeführt, wenn 'Abbruch' gedrückt wird
MsgBox "Es wurde Abbruch gedrückt"
End Sub

   

Relevante Artikel

  • Dateiname und Pfad in Fußzeile einfügen

      Die Datei muss dazu aber mindestens 1 mal gespeichert worden sein, sonst kann der Pfad ja nicht bekannt sein. Also die Datei zuerst speichern und anschließend das Makro ausführen....

  • Programmverzweigung beim Schließen der Arbeitsmappe

    103003 Diese Makro frägt nach, ob die Arbeitsmappe gespeichert werden soll.Bei 'Ja' wird die Arbeitsmappe gespeichert und geschlossen Bei "Nein' kann ein entsprechender Code ausgeführt werden, der...

  • Arbeitsmappe per VBA schließen

    103002 Es gibt verschiedene Möglichkeiten per VBA eine Arbeitsmappe zu schließen.Variante 1: Speichern mit DialogfensterBei dieser Variante stellt Excel die Frage, ob die Datei gespeichert werden...

  • Dateien eines beliebigen Verzeichnisses auflisten (Inhaltsverzeichnis)

    105043 Dieses Makro listet alle Dateien des angegebenen Verzeichnisses ab der aktiven Zelle auf.Sub DateinamenAuflisten()'Dateinamen in einem bestimmten Verzeichnis auflisten'Die Angabe des...

  • Umbenennen von Dateien per VBA

    105040   Das folgende Makro benennt Dateien um, indem der alte Dateiname einfach durch den neuen ersetzt wird. Public Sub umbenennen() Name "C:\test\mappe1.csv" As "C:\test\mappe1.txt" End Sub   So wird aus der...

   

Excel-Inside auf Facebook Excel-Live News blog Excel-Inside RSS-Feed Twitter Account für Excel-Inside Mail an Excel-Inside 

Programmierung
Excel Auftragsprogrammierung Access Auftragsprogrammierung
Word Auftragsprogrammierung Outlook Auftragsprogrammierung
   
Unsere Produkte
Office Schulungen VBA, Excel, Access
E-Book Formeln und Funktionen Excel 2013