Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Prüfen wenn Datei vorhanden

Forumthread: Prüfen wenn Datei vorhanden

Prüfen wenn Datei vorhanden
23.04.2003 19:25:01
Walter
Hallo Zusammen,

habe eine kleine Frage.
Ich habe ein Makro bei dem Excel mit:
Application.Quit
geschlossen wird.
Ich möchte mit einer If Then Abfrage prüfen, wenn noch eine Datei
vorhanden ist, soll Excel nicht geschlossen werden.
Wenn z.B. über Fenster ich noch sehe das eine Datei im Hintergrund vorhanden ist.
Aber wie ???
Gruss Walter


Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Prüfen wenn Datei vorhanden
23.04.2003 19:28:30
moe

Hallo Walter
ich glaube mein makro wird dir wieterhelfen

Gruss
moe

Sub Fensterzählen()
If Application.Windows.Count > 1 Then
MsgBox "Es ist noch eine offen"
End If

End Sub

Re: Prüfen wenn Datei vorhanden
23.04.2003 19:56:39
Walter

Hallo Moe,

herzlichen Dank, eine bitte möchte aber wenn eine offen ist,
weiterarbeiten können.
Klappt das
Gruss walter

Anzeige
Re: Prüfen wenn Datei vorhanden
23.04.2003 19:59:01
moe

So müsste es gehen hier wird das aktuelle sheet geschlossen aber excel beleibt offen. wenn mehr als eine Datei geöffnet sind.

gruss
moe

Sub Fensterzählen()
If Application.Windows.Count > 1 Then
activeworkbook.close
End If

Re: Prüfen wenn Datei vorhanden
23.04.2003 20:56:45
Walter

Hallo Moe,
herzlichen Dank.
Es klappt alles vorzüglich.
Gruss
Walter

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige