Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
856to860
856to860
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

geöffnete Arbeitsmappen eines Pfads schließen

Forumthread: geöffnete Arbeitsmappen eines Pfads schließen

geöffnete Arbeitsmappen eines Pfads schließen
28.03.2007 10:26:48
Wilfried
Hallo und guten Morgen,
ich möchte per VBA alle geöffneten Arbeitsmappen aus einem genannten Pfad ohne speichern schließen.
Der Pfad z.B: C:\eigene Dateien ist in Tabelle1, Zelle A1 hinterlegt
besteht die Möglichkeit, den folgenden Code der alle geöffneten Dateien schließt entsprechend zu erweitern?

Sub AlleMappenSchließenMitSpeichern()
Dim Mappe As Workbook
For Each Mappe In Application.Workbooks()
Mappe.Close savechanges:=True
Next Mappe
End Sub
Ich würde mich über eine Antwort sehr freuen
Gruß
Wilfried
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: geöffnete Arbeitsmappen eines Pfads schließen
28.03.2007 10:33:00
Oberschlumpf
Hi Wilfried
Versuch mal so (ungetestet):

Sub AlleMappenSchließenMitSpeichern()
Dim Mappe As Workbook, lstrFile As String
For Each Mappe In Application.Workbooks()
lstrFile = Dir(ThisWorkbook.Sheets("Tabelle1").Range("A1").Value & "\" & Mappe.Name)
If Mappe.Name  ThisWorkbook.Name And lstrFile  "" Then
Mappe.Close savechanges:=True
End If
Next Mappe
End Sub
Konnte ich helfen?
Ciao
Thorsten
Anzeige
AW: geöffnete Arbeitsmappen eines Pfads schließen
28.03.2007 10:58:00
Wilfried
Super Thorsten,
genauso hatte ich es mir vorgestellt!!
Vielen Dank für Deine schnelle Hilfe.
Wilfried
AW: geöffnete Arbeitsmappen eines Pfads schließen
28.03.2007 10:43:00
Rudi
Hallo, 

Sub AlleMappenSchließenMitSpeichern()
Dim Mappe As Workbook
For Each Mappe In Application.Workbooks()
If Mappe.Path = Range("A1") And Not Mappe Is ThisWorkbook Then Mappe.Close savechanges:= _
True
Next Mappe
End Sub

Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe
Anzeige
AW: geöffnete Arbeitsmappen eines Pfads schließen
28.03.2007 10:49:06
Case
Hallo,
probier mal so - es wird nicht gespeichert:
Option Explicit
Sub AlleMappenSchließenMitSpeichern()
Dim Mappe As Workbook
For Each Mappe In Application.Workbooks()
If Mappe.Name  ThisWorkbook.Name And Mappe.Path = Range("A1").Text Then
Mappe.Close False
End If
Next Mappe
End Sub
Servus
Case
Anzeige
Vielen Dank Thorsten, Rudi und Case -es klappt
28.03.2007 11:08:00
Wilfried
Vielen Dank Thorsten, Rudi und Case -es funktioniert
Ich habe mich über Eure schnelle Unterstützung sehr gefreut.
Gruß
Wilfried
;

Forumthreads zu verwandten Themen

Speichern in freigegebenen Arbeitsmappen
Jürgen

Hallo,
habe zur Zeit folgendes Problem:
Gebe über eine Userform Daten in eine freigegebene Arbeitsmappe ein. Wie kann ich sicherstellen, daß auch alle Daten korrekt eingegeben/gespeichert werden. Möchte erreichen, daß die Daten vom User1 die er gerade in die Zeile XY einträgt nicht mit...
03.11.2008 13:01:09
Thread-ID: 1021312
8 Beiträge
Anzeige
Arbeitsmappen in ein einziges Tabellenblatt
Andreas

Guten Morgen zusammen,
für eine Auswertung möchte ich die Inhalte der Tabellenblätter (jeweils um die 30) von mehreren Arbeitsmappen (ca. 10) in eine einzige Tabelle in einer neuen Datei kopieren.
Ich habe mir mit Hilfe diverser Foreneinträge und dem Recorder schon ein paar Versuche „zu...
18.11.2008 11:01:00
Thread-ID: 1025548
3 Beiträge
Datenaktualisierung in freigegebenen Arbeitsmappen
Jens

Hallo Excel-Experten,
habe folgendes Problem:
Wir nutzen eine im Netzwerk (5 -6 Arbeitsplätze) freigegebene Arbeitsmappe (Excel 2003).
Darin befinden sich im oberen Bereich ein Belegungsplan unserer Einsatzkräfte
Weiter unten ist eine Datentabelle von unserem CRM System eingebun...
08.01.2009 10:34:00
Thread-ID: 1037792
5 Beiträge
Absturz bei 2 geöffneten Arbeitsmappen
Steffen

Hallo zusammen,
habe das Problem das bei einer mit VBA programmierten Arbeitsmappe nach Öffnen einer weiteren Arbeitsmappe (ohne Programmierung) Laufzeitfehler auftreten und sich die Makros so nicht mehr ausführen lassen. Schliesse ich die zusätzliche Mappe so taucht das Problem nicht mehr...
12.01.2009 23:48:54
Thread-ID: 1039058
2 Beiträge
Anzahl der zu öffneder Arbeitsmappen auslesen
Chris

Hallo zusammen,
ich habe ein kleinen Schönheitseingriff in meinen Tool was eigentlich gut funktioniert vor. Ich habe einen Code aus dem Forum angepasst. Ich importiere aus beliebig vielen Arbeitsmappen (derzeit max ca. 100, können aber noch mehr werden) bestimmte Bereiche und füge diese in...
04.03.2009 10:22:22
Thread-ID: 1056227
3 Beiträge
Anzeige
Arbeitsmappen mit Ausnahme schliessen
peter

Hallo und guten Tag
Wie kann ich mit VBA alle Exel Arbeitsmappen mit Ausnahme einer "MeineDatei.xls" schliessen.
Vielen Dank schon mal im voraus
Gruß Peter
08.04.2009 19:53:11
Thread-ID: 1067815
5 Beiträge
Blätter in Arbeitsmappen ausblenden
Thorsten

Guten Tag,
besteht die Möglichkeit in Excel zwei Tabellenblätter dauerhaft auszublenden.
So, dass diese nur per Passwort o.ä. wieder eingeblendet werden können?
Vielen Dank!
LG
Thorsten
14.07.2009 15:16:03
Thread-ID: 1088531
10 Beiträge
Anzeige
Suche über mehrere Arbeitsmappen
Misery1704

Hallo und Hilfe,
ich muß für meine Chefin ein Sheet inkl. VBA erstellen, leider hab ich keine Ahnung wie.
In einem Ordner (Vorstellungsgespräche) sind mehrere Excel-Dateien (nach Datum benannt) hinterlegt. In diesen über 200 Dateien (Bewertung der einzelnen Bewerber) soll per Userform e...
03.08.2009 12:39:41
Thread-ID: 1093186
13 Beiträge
Massenpfl.makro um Arbeitsmappenmodule zu leeren?
alexander

Hallo,
ich habe eine Menge an Dateien wo ich gerne den VBA Code aus den Arbeitsblattmodulen löschen möchte. Dasselbe auch für den Code aus "Diese Arbeitsmappe".
Er soll die Dateien quasi nacheinander öffnen und den den Code rauslöschen (aber nur aus den Tabellenblattmodulen).
wie ge...
19.08.2009 13:55:03
Thread-ID: 1097111
3 Beiträge
Spalten aus 2 Arbeitsmappen vergleichen mit VBA
stefan.kutsch@gmx.de

Hallo Forum.
Ich habe folgendeds Problem: Ich habe zwei Arbeitsmappen. Jetzt möchte ich Tabelle1 aus Mappe1 mit Tabelle2 aus Mappe2 vergleichen. Ist in Spalte A eine Zelle in Zeile (x) unterscheidlich, soll er in Tabelle1 Zeile (x) eine Leerzeile einfügen und den Inhalt aus Tabelle 2 Spalt...
11.09.2009 13:23:20
Thread-ID: 1102003
13 Beiträge
Prüfung auf geöffnete Arbeitsmappen
orange

Hallo,
ich möchte beim Start meiner Excelarbeitsmappe prüfen ob schon Excel geöffnet ist und wenn ja sollte eine Meldung kommen das erst alle Anwendungen geschlossen werden müssen. Danach sollte die Arbeistmappe ohne speichern wieder geschlossen werden, sofern Excel gestartet war.
Wie k...
16.10.2009 17:20:12
Thread-ID: 1110166
3 Beiträge
2 Arbeitsmappen mit Makro gleichzeitig
Mirko

Hallo Leute,
habe 2 Excel Dateien eine mit Makro`s und eine mt VBA programmiert nun vertragen sich die beiden zusammen nicht laufen instabil
woran kann das liegen kann einer helfen ?
Es laufen auf dem Rechner noch weitere Programme nebenher fast alles Internet Basierte Programme
...
04.11.2009 20:30:25
Thread-ID: 1114579
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige