Makro geht mit Blattschutz nicht - trotz unprotect
23.10.2008 16:41:43
donald
ich hab nochmal eine Frage. Ich hab ein paar Zellen meines Blatts mit dem Blattschutz ausgestattet. Und jetzt funktioniert mein Makro nicht, obwohl ich protect/unprotekt ins Makro reingeschrieben habe:
Sub FarbeSortieren()
ActiveSheet.Unprotect Password:="esm-win"
Range("S12:S160").Select
Application.Run "'Vorlage LongList_20080903_MR.xls'!FarbCodes"
Range("A12:AZ160").Sort Key1:=Range("T12"), Order1:=xlAscending, Key2:=Range("F12" _
), Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal
' dieses Makro wendet das Makro "Farbcodes" an und sortiert die Spalte T, so dass
' die Farbcodes und damit die Farben sortiert werden.
ActiveSheet.Protect Password:="esm-win"
End Sub
Was habe ich denn da falsch gemacht, weiß das jemand?
Grüße