Die Anzahl der offenen Excel-Dateien per Makro bestimmen

02. September 2008
Martin Althaus Von Martin Althaus, Excel, Office ...

So ermitteln Sie die Excel-Fensteranzahl

Jede geöffnete, sichtbare Arbeitsmappe stellt Excel in einem Fenster dar. Die einzelnen Fenster können Sie über das Menü "Fenster" aktivieren.

Wenn Sie in einem Makro feststellen möchten, wie viele Fenster geöffnet sind, verwenden Sie die Eigenschaft Windows.Count. Sie ist Bestandteil des Objekts Application.

Das folgende Makro demonstriert, wie Sie die Anzahl der Fenster auslesen und in einer Hinweis-Dialogbox darstellen:

Sub Fensteranzahl()
Dim a As String
a = MsgBox("Es sind zurzeit " & Application.Windows.Count & " Excel-Dateien geöffnet.", vbOKOnly, "Fensteranzahl")
End Sub

Rufen Sie das Makro auf, zeigt Ihnen Excel in einem Fenster an, wie viele Excel-Dateien zurzeit geöffnet sind, also wie viele Fenster Sie anwählen können. Die folgende Abbildung demonstriert, wie das Fenster aussehen kann:

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

  • Excel Vorlagen zum Sofort-Download
  • Geprüfte Vorlagen zum Sofort-Einsatz
  • Gratis Makros & Add-Ins im Downloadcenter
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"