Makro beim Öffnen bringt LaufzeitFehler
18.06.2005 12:53:24
Vhem
ich hatte das Problem, daß beim Öffnen mehrerer Dateien das Datums-Format anschließend falsch.
Meine Erkenntnis : Excel übernimmt bei Workbooks.Open nicht die Ländereinstellung von Windows.
Ein makro soll das beheben. Es funktioniert, d.h. das datumsformat ist o.k.;
aber
es erscheint eine Fehlermeldung (mein VBA-Wissen ist halt nicht ausreichend.)
Option Explicit
Private Sub Workbook_Open()
Workbooks.Open ("D:\Eigene Dateien\B-Hem\!!!---REWE\!-Pep-MA-U\Urlaub-ReweBHem-2005.xls")
Workbooks.Open ("D:\Eigene Dateien\B-Hem\!!!---REWE\!-Pep-MA-U\Kalender-2005.xls")
Workbooks.Open ("D:\Eigene Dateien\B-Hem\!!!---REWE\!-Pep-MA-U\PEP-ReweBHem-KW25.xls")
Call DatumsFormat
End Sub
Sub DatumsFormat()
'
' DatumsFormat Makro
' Makro am 17.06.2005 von Hempel aufgezeichnet
'
'
Range("A1").Select
Selection.NumberFormat = "d/m"
End Sub
Wer kann helfen ?
Mfg Vhem
Anzeige