Hallo,

ich habe ein kleines Problem und würde mich über eine Anwort riesig freuen.

Folgendes: In einem Ordner befinden sich Dateien der einzelnen Monatstage innerhalb der Woche von Montag bis Freitag, wie z. B. im März: 01, 02, 03, 06, 07, 08, 09, 10, 13, 14, 15 etc. ff. Ich habe ein Makro geschrieben, dass die Formeln in den Zellen von G14:AL17 über das Makro InfoText aktualisert und erweitert. Um jetzt nicht alle einzelnen Kalendertage zu öffnen und den Makro auszuführen habe ich folgendes Makro aufgezeichnet, das im wesentlichen auch funktioniert. 

Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\10.xlsm", UpdateLinks:=0
    Application.Run "'10.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\11.xlsm", UpdateLinks:=0
    Application.Run "'11.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\12.xlsm", UpdateLinks:=0
    Application.Run "'12.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\13.xlsm", UpdateLinks:=0
    Application.Run "'13.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\14.xlsm", UpdateLinks:=0
    Application.Run "'14.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\15.xlsm", UpdateLinks:=0
    Application.Run "'15.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\16.xlsm", UpdateLinks:=0
    Application.Run "'16.xlsm'!InfoText"
    ActiveWindow.Close
     Workbooks.Open Filename:="L:\BESTELLUNG\2017\März\17.xlsm", UpdateLinks:=0
    Application.Run "'17.xlsm'!InfoText"
    ActiveWindow.Close

Allerdings existiert das Workbook Nr "12" nicht. Wie kann ich das umschreiben, sodass 
er nur die vorhandenen Dateien berücksichtigt und die nicht existierenden Dateien dann 
gnoriert.?