würde gern Tabellenblatt erzeugen und nach einer Zelle aus Sheet1 benennen. Wie geht so etwas?
Danke für die Tipps.
Gruß Andi
Sub Blattname()
Um ein neues Excel-Tabellenblatt zu erzeugen und es nach einer Zelle zu benennen, kannst du folgende Schritte befolgen:
Öffne Excel und das Workbook, in dem du ein neues Tabellenblatt erstellen möchtest.
Drücke ALT + F11, um den VBA-Editor zu öffnen.
Erstelle ein neues Modul, indem du im Menü auf Einfügen und dann auf Modul klickst.
Füge folgenden Code in das Modul ein:
Sub Blattname()
Dim neuesBlatt As Worksheet
Set neuesBlatt = Worksheets.Add
neuesBlatt.Name = Sheets("Tabelle1").Range("A1").Value
End Sub
Ändere Tabelle1 und A1 in den Namen deines bestehenden Blattes und der Zelle, die du verwenden möchtest.
Führe das Makro aus, um das neue Tabellenblatt zu erstellen und entsprechend zu benennen.
Fehler: "Ungültiger Blattname"
\, /, ?, *, [, ]).Fehler: "Blatt existiert bereits"
Wenn du ein Excel-Tabellenblatt nach einer Zelle benennen möchtest, ohne ein VBA-Makro zu verwenden, kannst du auch manuell vorgehen:
Beispiel 1: Wenn in Zelle A1 der Text "Januar" steht, wird das neue Tabellenblatt automatisch "Januar" benannt, wenn du das obenstehende Makro ausführst.
Beispiel 2: Wenn du mehrere Tabellenblätter erstellen möchtest, kannst du den Code erweitern:
Sub MehrereBlätter()
Dim i As Integer
For i = 1 To 3 'Erstellt 3 Blätter
Dim neuesBlatt As Worksheet
Set neuesBlatt = Worksheets.Add
neuesBlatt.Name = Sheets("Tabelle1").Cells(i, 1).Value ' Zelle A1, A2, A3
Next i
End Sub
On Error Resume Next vor dem Umbenennen der Blätter, um das Makro robuster zu machen.1. Wie benenne ich ein Excel-Blatt nach einer Zelle ohne VBA? Du kannst das Blatt manuell umbenennen, indem du mit der rechten Maustaste auf das Blatt klickst und „Umbenennen“ wählst. Gib dann den Namen aus der gewünschten Zelle ein.
2. Kann ich ein Blatt nach mehreren Zellen benennen? Ja, du kannst den VBA-Code so anpassen, dass er Werte aus mehreren Zellen verwendet, um den Blattnamen zu generieren, z.B. durch Verkettung der Werte.