mappe schließen

Forumthread: mappe schließen
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: mappe schließen

mappe schließen

22.12.2003 15:16:43

Florian

Servus Forum!

Ich hoffe ihr könnt mir ein Weihnachtsgeschenk machen, ich habe folgendes Problem:

Ich öffne mittels einer Userform verschiedene Arbeitsmappen welche immer mir "Formular" beginnen, aber verschiedene Endungen im Namen haben. Wie schaffe ich es diese (und nur diese) Mappen zu schließen. Sollte in ungefähr so funktionieren:

Workbooks("Formular*****.xls").Close SaveChanges:=False

Wäre toll wenn ihr mir helfen könntet!

Schöne Grüße,

Florian

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: mappe schließen

22.12.2003 15:21:00

WernerB.
AW: mappe schließen

22.12.2003 15:39:43

Florian

AW: mappe schließen

22.12.2003 15:21:00

WernerB.

Hallo Florian,

wie gefällt Dir das?


Sub AlleSchliessen()
Dim wkb As Workbook
For Each wkb In Workbooks
If wkb.Name <> ThisWorkbook.Name And _
Left(wkb.Name, 8) = "Formular" Then _
wkb.Close SaveChanges:=False
Next
Beep
End Sub

Viel Erfolg, frohes Fest und guten Rutsch wünscht
WernerB.

P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).

AW: mappe schließen

22.12.2003 15:39:43

Florian

Hi Werner!

Gefällt mir sehr gut;-), vielen Dank!

Wünsche Dir schöne Weihnachten und einen guten Rutsch!

Florian

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!