bei mir ist "Holland in Not".
Habe gerade per Zufall festgestellt das mein Makro irgenwie Falsch ist.
Wenn ich das Passwort nicht eingebe sondern direkt auf Abrechen drücke wird mein Schutz-Makro trotzdem ausgeführt, darf nicht.
Hier mein Makro:
Sub PKL_Muster_ändern()
Application.ScreenUpdating = False
On Error Resume Next
Sheets("Muster").Select
Range("A1").Select10:
Err.Clear
If ActiveSheet.Protect = True Then
Application.Dialogs(xlDialogProtectDocument).Show
If Err.Number = 1004 Then
MsgBox " Falsches Kennwort !" & Chr(13) & Chr(13) & _
" Nur über Herrn Berg zu erfragen !"
GoTo 10
End If
Sheets("Muster").Unprotect Password:="wwpa"
Application.Run "'Muster.xls'!PKL_Fixierung_raus"
Sheets("Muster").Select
Range("A1").Select
ActiveWindow.ScrollRow = 80ActiveWindow.ScrollColumn = 28 'Spalte S
Sheets("Muster").Select
Range("AG92").Select
End If
End Sub
Vielleicht kann mir einer schnell helfen ?
Gruß Walter MB