VBA Arbeitsblatt kopieren inklusive Formeln
02.01.2025 14:22:05
purpel_1234
Ich arbeite derzeit daran, dass ich per Knopfdruck bestimmte Arbeitsblätter kopieren kann, die gleichzeitig mit verschiedenen Infos per Platzhalter befüllt werden. Die zu kopierenden Arbeitsblätter dienen also als Vorlage und enthalten auch Formeln, die sich aber auch nur auf Zellen innerhalb des Arbeitsblatts beziehen. Mein Code funktioniert grundsätzlich auch, allerdings werden die Formeln leider nicht mitkopiert. Ich habe auch schon einen Locked-Befehl eingefügt, ebenfalls Fehlanzeige, was mache ich falsch?
If wsInput.Range("Q11").Value = True Then
Sheets("Template6").Cells.Locked = True ' Zellen sperren, um Formatierungen und Formeln zu erhalten
Sheets("Template6").Copy After:=Sheets(Sheets.Count)
With ActiveSheet
.Name = "Support"
Call ReplacePlaceholders(.UsedRange, Value1, Value2, Value3, Value4, Value5, Value6, Value7, Value8)
End With
End If
Anzeige