Anzahl nicht-ausgeblendeter Mappen



Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Anzahl nicht-ausgeblendeter Mappen
von: Adi
Geschrieben am: 15.06.2002 - 13:35:32

Schönes Wochenende zusammen,

wie man die aktuell geöffneten Mappen zählt, weiß ich: Workbook.Count.
Aber: Mit welcher Eigenschaft/ Methode kann ich feststellen, wieviel nicht-ausgeblendeter Mappen offen sind.

(Ich will am Ende eines Makros, wenn nur noch ausgeblendete Mappen - z.B. personl.xls - offen sind, Excel mit .Quit schließen.)

Gruß
Adi

nach oben   nach unten

Lösung selbst gefunden
von: Adi
Geschrieben am: 15.06.2002 - 16:04:24

von Florian in altem Beitrag:

Offen = 0
For i = 1 To Windows.Count
If Windows(i).Visible Then Offen = Offen + 1
Next
If Offen = 1 Then Application.Quit

Dank an Florian

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Anzahl nicht-ausgeblendeter Mappen"