Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1840to1844
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
Inhaltsverzeichnis

Alle Excel Mappen außblenden außer best

Alle Excel Mappen außblenden außer best
02.08.2021 18:52:25
Sabbel
Hallo,
ich nutze Excel Office 365.
Ich möchte per VBA alle offenen Arbeitsmappen ausblenden außer Datei1.xlsm und Datei2.xlsm
Kann mir jemand weiterhelfen?
Liebe Grüße
Sabbel

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Excel Mappen außblenden außer best
02.08.2021 19:07:28
Nepumuk
Hallo,
so:

Public Sub Ausblenden()
Dim objWorkbook As Workbook
For Each objWorkbook In Workbooks
If objWorkbook.Name  "Datei1.xlsm" And _
objWorkbook.Name  "Datei2.xlsm" Then _
objWorkbook.Windows(1).Visible = False
Next
End Sub
Gruß
Nepumuk
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige