Excel 2003 -> 2007 Makro stürzt ab
Robert
Folgendes Problem, unter Excel 2003 läuft das Makro einwandfrei:
Private Sub CommandButton2_Click()
If MsgBox("Sind sie sicher, dass sie alle Daten gespeichert haben?", vbYesNo) = vbYes Then
On Error GoTo ILaufwerk:
Application.DisplayAlerts = False
ActiveSheet.Protect Password:="'*****"
ActiveWorkbook.SaveAs Filename:="P:\Test.xls"
Application.DisplayAlerts = True
ActiveWorkbook.Close
ILaufwerk:
Application.DisplayAlerts = False
ActiveSheet.Protect Password:="******"
ActiveWorkbook.SaveAs Filename:="I:\Test.xls"
Application.DisplayAlerts = True
ActiveWorkbook.Close
Else: Exit Sub
End If
End Sub
Jedoch unter excel 2007 will das Makro automatisch zum I-Laufwerk und stürzt ab. Kann es sein, dass excel 2007 ein Problem mit dem Code (Setzen des Passworts) hat?Viele Grüße
Robert
Anzeige