VBA Sheet Copy und Format beibehalten
19.03.2021 15:47:19
Marko
mit folgendem Code kopiere ich ein Sheet und benenne dieses neu. Meine Frage ist, wie kann ich mit dem Kopieren die Formatierung des ursprünglichen Sheets beibehalten?
Sub LieferantEinfuegen()
Dim NewName As String
Sheets("Lft_Neu").Copy Before:=ActiveSheet
NewName = InputBox("Geben Sie die Lieferanten-Nummer ein!", "Neuer Lieferant")
ActiveSheet.Name = NewName
End Sub
Gruß, Marko
Anzeige