Ich bin gerade an einer Formel dran, die ein neues Datenblatt erstellt mit dem Namen aus einer Zelle und anschließend soll in die Zelle "A5" ein Wert kopiert werden:
Sub Rechnung()
Titel = Sheets(1).Range("N19").Value
Sheets("Vorlage").Select
Sheets("Vorlage").Copy After:=Worksheets(Worksheets.Count) 'neues Blatt am Ende der Tabelle
Sheets(Worksheets.Count).Name = Titel
Sheets("Übersicht Wohnungen").Select
Range("A19").Select
Selection.Copy
Range("A5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets(Worksheets.Count).Name = Titel
End Sub
allerdings müchte ich in der Formel nicht den Namen des Blattes hinterlegen sondern dieser soll aus besagter Zeller entnommen werden.ich hoffe Ihr könnt mir weiterhelfen. Vielen Dank!