Fehler 1004 bei VBA-Code
29.03.2006 18:20:36
ras
Habe zwar schon einige Jahre Excel-Erfahrung, bin aber gerade dabei, die ersten Schritte in VBA zu gehen (konnte ich mich bisher erfolgreich drücken ;-)
Habe hier in XL2000 ein Blatt, das passwortgeschützt sein soll, um nur Eingaben in bestimmten Zellen zuzulassen. Im VBAProject zu dieser Tabelle (also nicht als Modul) habe ich im Zusammenhang mit Optionsbuttons einiges an VBA-Code hinterlegt. Dieser funktioniert auch solange einwandfrei, wie das Blatt nicht geschützt ist.
Mit Blattschutz kommt der in diesem Forum schon öfters erwähnte Fehler 1004. Habe schon einige Vorschläge aus diesem Forum ausprobiert, aber der Fehler lässt sich einfach nicht verhindern.
So sieht ein Code-Beispiel aus:
Private Sub OptBtn_LED_48_Click()
ActiveSheet.Unprotect "123"
Range("H21").Select
Selection.ClearContents
Range("H21").Select
ActiveCell.Formula = "='IP-KT'!b6"
Range("A21").Select
ActiveSheet.Protect "123"
End Sub
Das kann doch eigentlich nicht so schwierig sein und doch komme ich nicht weiter? Kann jemand helfen?
Vielen Dank vorab!