Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
380to384
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Prüfen ob Datei offen...

Prüfen ob Datei offen...
17.02.2004 09:58:26
Giuseppe
Hallo Freunde, guten morgen.
Ich habe 'ne Frage:
Ich möchte in Workbook_open prüfen ob ein Datei offen ist und, wenn offen ist schließen.
Wie geth das?

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

Betreff
Datum
Anwender
Anzeige
AW: Prüfen ob Datei offen...
17.02.2004 10:02:39
Matthias G
Hallo Giuseppe,
mit einem kleinen Trick...

Sub Schliessen(name As String)
On Error Resume Next
Workbooks(name).Close
On Error GoTo 0
End Sub

Schließt die Datei, wenn sie geöffnet ist, eine Fehlermeldung wird unterdrückt, wenn die Datei nicht geöffnet ist.
Gruß Matthias
AW: Prüfen ob Datei offen...
17.02.2004 10:02:40
Ramses
Hall

Sub Close_Open_FIle()
Dim wb as Workbook
For Each wb in Application.Workbooks
If wb.Name = "Deine Mappe.xls" then
wb.Close False
End if
Next
End Sub

Gruss Rainer
Danke oT
17.02.2004 10:04:06
Giuseppe
.
Merci :-) Geschlossen o.T.
17.02.2004 10:12:14
Ramses
...

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige