kurze Frage ist es möglich Formeln in Zellen per Makro zu kopieren trotz Blattschutz ohne Kennwort?
Meine Formel steht in A1 und soll bis in A5 herunterkopiert werden, dabei darf aber keine der darunterliegenden Zellen formatiert werden.
Gruß
Wrobel
Sub Formelkopieren()
Dim wks As Worksheet
Set wks = ActiveSheet
wks.Unprotect
wks.Range("A1").Copy
wks.Range("A2:A5").PasteSpecial Paste:=xlPasteFormulas
wks.Protect
End Sub