Laufzeitfehler
02.09.2004 08:23:39
Georg
habe da ein kleines Problem:
über ein Makro öffne ich 2 Dateien. Dieses Makro ist auf einem Arbeitsblatt einem Buttom zugewiesen. Wenn die Dateien bereits geöffnet wurde erhalte ich einen Laufzeitfehler 1004. Wie kann ich das verhindern?
hier das Makro
Sub MKNR_eingeben()
' MKNR_eingeben Makro
' Makro am 27.08.2004 von Georg aufgezeichnet
ChDir "C:\Abwicklung\Office"
Workbooks.Open Filename:="C:\Abwicklung\Office\MKNR.xls"
Application.DisplayAlerts = False
ChDir "C:\Abwicklung"
ActiveWorkbook.SaveAs Filename:="C:\Abwicklung\MKNR.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Workbooks.Open Filename:="C:\Abwicklung\MK-Nr-Auslieferungen.xls"
Application.DisplayAlerts = True
End Sub