Hallo,
ich brauche bitte Eure Hilfe und zwar habe ich folgenden Code:
Dim wkb As Workbook
For Each wkb In Workbooks
If wkb.Name ThisWorkbook.Name Then
Application.DisplayAlerts = False
wkb.Save
Application.DisplayAlerts = True
wkb.Close
Else
End If
Dieser bewirkt, dass alle offenen Dateien geschlossen werden.
Ich möchte aber nur das Dateien geschlossen werden die sich in einem bestimmten Verzeichnis befinden.
Die Abfrage zum Beispiel mit einer Funktion
If DateiIstDa("mappe1.xls") Then wkb.clse savechanges:=True
Danke Euch schonmal
Markus