Das Archiv des Excel-Forums

Wenn Bed. beim Speichern Quit / Close

Bild

Betrifft: Wenn Bed. beim Speichern Quit / Close
von: udo

Geschrieben am: 25.09.2003 15:33:40

Hallo Excies,

bräuchte bitte kurz eure Hilfe.

Ich beende eine Datei per VBA auf folgendem Weg

ThisWorkbook.Close

das ist soweit toll, da somit die noch anderen geöffneten Dateien aus EXCEL noch geöffnet bleiben.

Nun meine Frage , wie müsste denn eine If Bedingung aussehen, dass wenn keine andere EXCEL Datei mehr geöffnet ist, das er dann von

ThisWorkbook.Close

auf

Application.Quit

umspringt, damit EXCEL insgesamt dann geschlossen wird. Kann mir dabei bitte Jemand helfen.

Gruß udo

Danke euch schon mal im Voraus ...
Bild


Betrifft: AW: Wenn Bed. beim Speichern Quit / Close
von: Hajo_Zi
Geschrieben am: 25.09.2003 15:38:55

Hallo Udo


Sub test()
If Workbooks.Count = 1 Then
' Datei Sichern
'Excel schliessen
Else
' Datei Sichern
End If
End Sub




Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

Zurzeit gibt es wieder Probleme mit der E-Mail Benachrichtigung.

Ich bekomme Mails zu Beiträgen an denen ich nicht beteiligt bin und zusätzlich noch Mails zu meinen eigenen Beiträgen.
Das Problem mit den eigenen Benachrichtigung kann gelöst werden durch Lösche und Neuanmelden. Dieses möchte ich aber nicht jeden Tag machen.
Um dieses Problem erstmal zu beseitigen habe ich die automatische Mailbenachrichtigung abgeschaltet.
Aus diesem Grunde ist es dem Zufall überlassen ob auf Rückfragen Antworten von mir kommen.


http://home.media-n.de/ziplies/



Bild


Betrifft: Danke dir Hajo, super , vielen lieben Dank oT
von: udo
Geschrieben am: 25.09.2003 15:50:43

...


Bild


Betrifft: Danke für Rückmeldung oT
von: Hajo_Zi
Geschrieben am: 25.09.2003 15:51:30




 Bild

Excel-Beispiele zum Thema " Wenn Bed. beim Speichern Quit / Close"

Zelleingaben speichern download Die "personl"-Arbeitsmappe ausgeblendet speichern download
Formeln mit Zelladressen speichern download Bestätigung beim Speichern unterdrücken. download
Arbeitsmappe unter dem Text eines Zelleintrags speichern download Einzelnes Tabellenblatt speichern download
Mappe unter Zelldatum speichern download Arbeitsmappe doppelt speichern download
Arbeitsmappe unter Namen speichern download Programmabbruch bei Überspeichernabfrage verhindern download
dBase-Datei laden, bearbeiten, speichern download Variablen in einer temporären Textdatei zwischenspeichern download
Ausgewählte Tabellenblätter als eigene Arbeitsmappen speichern download Einzelnes Tabellenblatt unter Tagesdatum speichern download
Menüpunkt SPEICHERN deaktivieren download Speichernabfrage beim Schließen der Arbeitsmappe download
Zeit eintragen und Tabelle minütlich als HTML-Datei speichern download Arbeitsmappe 10-minütlich als *.xls und *.bak-Datei speichern download
Texte mit unterschiedlichen Feldlängen als Textdatei speichern download Arbeitsmappe mit absoluten Werten unter neuem Namen speichern download
Text in NotePad schreiben, speichern, in Excel aufrufen download Sicherheitskopien von Arbeitsmappen speichern download
Arbeitsmappe 5 Sekunden nach dem Öffnen speichern und schließen download Tabellenblattbereich als Grafik speichern download
Blattschutz beim Speichern setzen download Eingetragenen Wert in TextBox speichern download
Zeilenweises Speichern von Texten download Tabellenblattdaten als Textdatei mit vorgegebenem Namen speichern download
Blätter in UserForm-ListBox auswählen und speichern download Filter vor Speichern zurücksetzen download
Blatt ohne Code, Steuerelement und Formeln speichern download Speichern ausschließlich über UserForm-Schaltfläche download
Speichern unter forlaufender Nummer download Daten in einer Textdatei ohne Anführungszeichen speichern download
Einzel-Arbeitsblätter einer Arbeitsmappe speichern. download Speichern-Befehl abfangen und unter Paßwort speichern download
Werte nach Gruppen aufteilen und in gesonderten Dateien speichern download HTML-Seite aus dem Internet aufrufen und als Textdatei speichern download
Auswahl in andere Arbeitsmappe kopieren, speichern, schließen download Beim Speichern Schaltfläche erstellen download
Speichern-Schaltfläche aktivieren/deaktivieren download Binärdatei aus dem Internet downloaden und speichern download
UserForm-TextBoxes-Texte in Textdateien speichern download Datei-Speichern-Dialog zusammen mit Paßwortdialog aufrufen download
Tabellenblattinhalte in getrennten Textdateien speichern download Buchstaben aus Textdatei entfernen und neu speichern download
Speichern-Dialog mit Dateinamen-Vorschlag aufrufen download Aktive Arbeitsmappe ohne VBA-Code und Button speichern download
Die Zeilen mit Wert in Spalte C als CSV-Datei speichern download Webabfrage periodisch aktualisieren und Ergebnisse speichern download