Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1540to1544
1540to1544
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Neues Tabellenblatt anlegen und bennenen per Makro

Forumthread: Neues Tabellenblatt anlegen und bennenen per Makro

Neues Tabellenblatt anlegen und bennenen per Makro
15.02.2017 09:50:26
Patrick
Hallo liebe Makro-Experten,
ich versuche ein Tabellenblatt per Makro anzulegen und automatisch zu benennen, abhängig davon was in einer bestimmten Zelle steht.
Per Makrorekorder habe ich folgendes erhalten:
Sheets("VORLAGE").Select
ActiveSheet.Buttons.Add(821.25, 16.5, 75.75, 18).Select
Sheets("VORLAGE").Copy After:=Sheets(4)
Range("K3").Select
Selection.Copy
Sheets("VORLAGE (2)").Select
Sheets("VORLAGE (2)").Name = "Juni 2017"
Range("M10").Select
ActiveSheet.Shapes.Range(Array("Button 1")).Select
Application.CutCopyMode = False
Selection.Delete
Selection.Cut
Das Tabellenblatt heißt VORLAGE. In Zelle K3 wird der Name des neuen Tabellenblattes angezeigt. Nach Erstellung einer Kopie von VORLAGE soll das neue Tabellenblatt so heißen wie in K3 steht.
Die Erstellung erfolgt per Klick auf den Button "erstellen", dieser Button soll im Nachgang im neuen Tabellenblatt gelöscht werden.
Nun das Problem:
Das neue Tabellenblatt wird erstellt und benannt, jedoch immer Juni 2017, da dieser Text bei Aufzeichnung des Makros in K3 stand. die Benennung muss jedoch variabel sein, es soll nur der Zwischenspeicher eingefügt werden.
Die Löschung des Button "erstellen" (Button 1) erfolgt nicht korrekt. Er wird gelöscht, es erscheint jedoch ein neuer sowie in der Vorlage wird der selbe neue Button aus dem neuen Blatt über den bereits vorhandenen Button "gelegt"
Kann mir Makro-Noob jemand helfen?
Vielen Dank!
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Neues Tabellenblatt anlegen und bennenen per Makro
15.02.2017 12:27:41
Rudi
Hallo,
so? 
Private Sub CommandButton1_Click()
ActiveSheet.Copy after:=Sheets(Sheets.Count)
With ActiveSheet
.Name = .Range("K3")
.Shapes(1).Delete
End With
End Sub
Gruß
Rudi
AW: Neues Tabellenblatt anlegen und bennenen per Makro
15.02.2017 13:30:50
Patrick
Grandios, vielen Dank!
Anzeige

Forumthreads zu verwandten Themen

Makro: Neues Tabellenblatt; löscht Makros
Heiko31

Hallöchen,
wieder mal ich mit folgendem Problem:
Ich möchte ein Makro haben, das mit Druck auf ein Steuerelement (Schaltfläche) das bestehende Arbeitsblatt komplett übernimmt.
Mit der Makro-Aufzeichnung macht er das auch wunderbar, aber er übernimmt mir nur die Schaltflächen, nicht...
22.11.2008 13:22:15
Thread-ID: 1026928
6 Beiträge
Blatt gegen neues Blatt tauschen, Formeln defekt
Kasimir

Hallo Leute,
eventuell wisst Ihr wie ich mein Problem lösen kann. Ich habe eine Datei mit vielen Formeln, die sich auch auf andere Tabellenblätter der Datei beziehen. Nun muss ich ein Tabellenblatt gegen ein anderes austauschen. Mein Problem ist nun, wenn ich das eine Blatt lösche, werden i...
04.03.2009 08:31:47
Thread-ID: 1056166
7 Beiträge
Kopiertes Tabellenblatt aus Vorlage speichern
Bertram

Hallo zusammen,
ich bekomme seit Neuestem beim Speichern einer Datei (mittels VBA) manchmal eine Fehlermeldung. Ich habe zwar schon im Archiv gesucht, aber nix gefunden. Wahrscheinlich liegt's an meinen Suchbegriffen, denn ich hab die Fehlermeldung noch nie vorher gesehen und weiß nicht, wi...
05.03.2009 12:20:42
Thread-ID: 1056776
11 Beiträge
Anzeige
Beim erstellen Tabellenblatt VBA Code eintragen | Herbers Excel-Forum
Robert
Guten morgen Leute,
wer kann mit helfen?
Ich möchte per VBA Code in dem neuer erstellten Tabellenblatt mit Namen XY einen Quellcode
reinschreiben z.b.
in einer Spalte AF addiere Zellen wenn die eine Zahl enthalten.
Mit dank im Voraus
Robert
23.05.2009 09:00:32
Thread-ID: 1076816
22 Beiträge
Mit Makro Tabellenblatt erstellen
Martin

Hallo VBAler,
ich hoffe, ich drücke mich exakt aus.
Anforderung: ein neuer Teilnehmer hinzufügen. Hierzu muss folgendes geschehen.
1. In Tabellenblatt Übersicht muss der Name des Teilnehmers hinzugefügt werden
2. In Tabellenblatt Fragen muss der Name des Teilnehmers hinzugefügt...
18.02.2011 16:11:14
Thread-ID: 1201716
4 Beiträge
Makro-Button / neues Tabellenblatt
Sambora

Hallo Excel-Experten,
bin neu hier in diesem Office-Forum, gefällt mir sehr gut!
Würde mich freuen, wenn mir jemand bei meinem Problem helfen könnte!
- Ich möchte in Tabellenblatt1 einen passwort-geschützten Makro-Button plazieren, welches bei Klicken Tabellenblatt2 erzeugt.
- T...
11.04.2012 17:12:36
Thread-ID: 1258809
3 Beiträge
VBA, automatisch Tabellenblätter erstellen
Tim

Hallo zusammen,
ich habe hier ein Makro, dass mir in Abhängigkeit des Zellenwertes A3 automatisch ein Tabellenblatt mit dem Namen des Zelleninhalts erstellt.
Sub NeuesBlatt() 'Varialen deklarieren Dim ws As Worksheet, wb As Workbook, sName As String ' Name des neuen Blattes auslesen s...
21.04.2012 11:33:55
Thread-ID: 1260338
3 Beiträge
neue Tabelle erstellen und hintenanstellen
Peter

Guten Tag
Mein Workbook hat vor Start des Makros eine einzige Tabelle, wenn das Makro nicht schon ausgeführt wurde.
Nun möchte ich mir eine weitere Tabelle mit dem Namen "Journal" anlegen und diese sollte an zweiter Stelle kommen.
Mir ist nicht klar, warum diese regelmässig an erst...
03.11.2012 22:10:24
Thread-ID: 1285137
3 Beiträge
Anzeige
Makro in neues Tabellenblatt
Gisela

Hallo,
das folgende Makro habe ich mit meinen bescheidenen Kenntnissen aus im Forum gefundenen Beiträge zusammengestellt. Es soll ein neues TB entsprechend der Eingabe in "neu" h11 erstellt werden. Funktioniert.
Danach soll der im alten TB enthaltene Code ins neue TB übernommen werden....
18.12.2012 10:10:31
Thread-ID: 1291333
4 Beiträge
Makro Tabellenblätter erstellen
Robin

Liebe Community,
da bald die neue Bundesliga-Saison startet, habe ich in Excel ein Tippspiel erstellt.
Das Problem ist nur, ich habe eine Vorlage, das ist das Blatt "Spieltag 1" und möchte nun weitere 33 Tabellenblätter mit "Spieltag 2", "Spieltag 3", usw. erstellen. Ist dies vielleicht...
26.07.2013 18:40:42
Thread-ID: 1324416
6 Beiträge
VBA Mastertabelle erstellen
WalterK

Hallo,
bei meiner Internetsuche bin ich auf den folgenden Code zur Erstellung einer Mastertabelle gestossen. Es sollen die Daten aller in einem Ordner befindlichen Dateien in 1 Blatt zusammengeführt werden.
Allerdings kommt bei der folgenden Zeile die Meldung: Laufzeitfehler 1004: Anwen...
27.07.2013 11:38:45
Thread-ID: 1324472
3 Beiträge
Anzeige
HILFE ! Kann keine neuen Tabellenblätter erstellen
Christian

Hallo Leute,
ich habe eine Excel-Mappe mit einigen Blättern und verschiedenen Makros. Auf einmal kann ich keine neuen Blätter mehr erstellen und auch nicht löschen. DIE ARBEITSMAPPE IST ABER NICHT FREIGEGEBEN. Finde keine Lösung.....hat einer von Euch ne Idee ?
Danke
Excel 2013
...
10.10.2013 14:37:16
Thread-ID: 1333944
5 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Neues Tabellenblatt anlegen und benennen per Makro

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und gehe zu dem Arbeitsblatt, in dem Du ein neues Tabellenblatt erstellen möchtest.

  2. Aktiviere den Entwicklermodus, falls noch nicht geschehen. Dies kannst Du unter "Datei" > "Optionen" > "Menüband anpassen" machen.

  3. Füge einen Button (ActiveX-Steuerelement) in Dein Arbeitsblatt ein.

  4. Klicke mit der rechten Maustaste auf den Button und wähle "Code anzeigen".

  5. Füge den folgenden VBA-Code ein, um ein neues Tabellenblatt zu erstellen und es gemäß dem Inhalt von Zelle K3 zu benennen:

    Private Sub CommandButton1_Click()
   ActiveSheet.Copy after:=Sheets(Sheets.Count)
   With ActiveSheet
       .Name = .Range("K3").Value
       .Shapes(1).Delete
   End With
End Sub

  6. Schließe den VBA-Editor und teste den Button, um sicherzustellen, dass das neue Tabellenblatt korrekt erstellt und benannt wird.

Häufige Fehler und Lösungen

  • Fehler: Das neue Tabellenblatt wird immer mit dem selben Namen erstellt.

    • Lösung: Stelle sicher, dass der VBA-Code auf die richtige Zelle verweist. Verwende .Range("K3").Value, um den aktuellen Wert der Zelle K3 zu erhalten.

  • Fehler: Der Button wird nicht richtig gelöscht.

    • Lösung: Überprüfe, ob der Button tatsächlich das erste Shape im neuen Tabellenblatt ist. Falls nicht, ändere den Index in Shapes(1) entsprechend.

Alternative Methoden

Neben der Verwendung eines Buttons kannst Du auch eine andere Methode nutzen, um ein neues Tabellenblatt zu erstellen:

  • Makro über das Menü ausführen:
    1. Erstelle ein Makro im VBA-Editor mit dem gleichen Code.
    2. Weise das Makro einem Menüpunkt oder einer Tastenkombination zu.

Diese Methode eignet sich gut, wenn Du regelmäßig ein neues Tabellenblatt erstellen musst.

Praktische Beispiele

  1. Neues Tabellenblatt mit vordefiniertem Namen erstellen:

    Sub NeuesTabellenblattErstellen()
   Sheets.Add.Name = "Neues Blatt"
End Sub

  2. Vorlage kopieren und umbenennen:

    Sub VorlageKopieren()
   Sheets("VORLAGE").Copy After:=Sheets(Sheets.Count)
   ActiveSheet.Name = "Mein neues Blatt"
End Sub

Diese Beispiele zeigen, wie Du mit VBA ein neues Tabellenblatt erstellen und es benennen kannst.

Tipps für Profis

  • Verwende Error Handling in Deinem VBA-Code, um sicherzustellen, dass keine Fehler auftreten, wenn der Name des neuen Tabellenblattes ungültig ist.

    On Error Resume Next
ActiveSheet.Name = .Range("K3").Value
If Err.Number <> 0 Then
   MsgBox "Ungültiger Name für das Tabellenblatt"
End If
On Error GoTo 0

  • Experimentiere mit der Formatierung des neuen Tabellenblattes, indem Du weitere VBA-Befehle hinzufügst, um das Aussehen zu gestalten.

FAQ: Häufige Fragen

1. Kann ich ein neues Tabellenblatt aus einer Vorlage erstellen?
Ja, Du kannst ein bestehendes Tabellenblatt kopieren und es dann umbenennen, wie im obigen Beispiel beschrieben.

2. Was passiert, wenn der Name des neuen Tabellenblattes bereits existiert?
Excel wird einen Fehler anzeigen. Es ist ratsam, den Namen vorher zu überprüfen und gegebenenfalls einen einzigartigen Namen zu generieren.

3. Ist es möglich, das neue Tabellenblatt in einer bestimmten Position einzufügen?
Ja, Du kannst das Argument After oder Before in der Copy-Methode verwenden, um die Position des neuen Tabellenblattes festzulegen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige