Änderung druchführen trotz Schreibschutz
26.07.2006 07:58:14
Knut
ich habe folgendes Makro in mein Excelsheet eingefügt.
Private Sub Worksheet_Activate()
Worksheets("Tabelle1").Range("A1").Copy Worksheets("Tabelle2").Range("A1")
End Sub
Jetzt möchte ich jedoch, dass die Tabelle2 schreibgeschützt ist. Dann stehe ich vor dem folgenden Problem. Änder ich was in Tabelle 1, dass durch das Markro in Tabelle 2 übernommen werden soll funktioniert das nicht, da ein Laufzeit fehler kommt mit der Begründung, dass Tabelle 2 schreibgeschützt ist. Mach ich den Schreibschutz raus funktioniert alles wie gehabt. Was kann ich nun tun?
Vielen Dank für die Hilfe.