17. 12. 2009, 17:24
# 1
Schelm
VBA - Tabellenblatt Kopieren und Umbenennen
Ich möchte per Command Button ein neues Tabellenblatt einfügen, den Reiter umbenennen, das Blatt wo sich der Command Button befindet kopieren und ans ende der Reiter stellen. Das mit dem Umbenennen und einen neuen Namen geben habe ich hin bekommen. Nur leider werden die Inhalte nicht mit kopiert und das neue Tabellenblatt wird nicht ans ende gestellt. Diesen Code benutze ich bis jetzt:
Private Sub CommandButton3_Click()
Dim strBlattname As String
strBlattname = InputBox("Geben Sie bitte den Blattnamen ein:")
If strBlattname <> "" Then
= strBlattname
End If
End Sub
17. 2009, 17:35
# 2
MOF Guru
Registrierung: 28. 02. Excel vba tabellenblatt kopieren und umbenennen free. 2001
Moin, Schelm,
warum kopierst Du nicht das Blatt selbst und veränderst den Namen? Beim Kopieren kannst Du auch die Position angeben...
__________________
cu
jinx
per 31.
Excel Vba Tabellenblatt Kopieren Und Umbenennen Download
Dann drücken F5 Geben Sie die Taste ein, um diesen Code auszuführen, und ein Eingabeaufforderungsfeld erinnert Sie daran, wie viele Kopien des aktuellen Arbeitsblatts Sie kopieren möchten (siehe Abbildung):
4. Geben Sie die Anzahl der Kopien in das Dialogfeld ein und klicken Sie dann auf OK Klicken Sie auf die Schaltfläche, Ihr aktuelles Arbeitsblatt wurde 5 Kopien dupliziert und mit dem Sequenznamen wie folgt umbenannt:
Hinweis: Im obigen Code können Sie den Text des Arbeitsblattnamens ändern. " KTE- "Zu Ihrem Bedarf. Vielleicht ist es für Sie schwierig, die oben genannten VBA-Codes anzuwenden. Hier werde ich ein einfaches Tool vorstellen. Kutools for Excel Mit seinen Erstellen Sie Sequenzarbeitsblätter Dienstprogramm können Sie diese Aufgabe ohne Aufwand erfüllen. Nach der Installation Kutools for Excel Bitte gehen Sie wie folgt vor:
1. Klicken Sie Kutoolen Plus > Arbeitsblatt > Erstellen Sie Sequenzarbeitsblätter, siehe Screenshot:
2. In dem Erstellen Sie Sequenzarbeitsblätter Dialogbox:
(1. Vorhanden - excel vba tabellenblatt kopieren und umbenennen - Code Examples. )
Excel Vba Tabellenblatt Kopieren Und Umbenennen 2019
(das entspricht 0, 0855% oder 1 Spende pro 1. 170 Beiträge per 31. 08. 2021)
Als Dankeschön der Ukraine helfen
17. 2009, 20:31
# 5
Leider komme ich damit auch nicht weiter, kann jemand den Code berichtigen. Ich habe meine Datei Angehängt. Die Vorlage funktioniert gut außer, Commandbutton 3, ich weiß nicht wie der Code richtig aussehen muss. find meinen Fehler nicht. Ich möchte das wenn auf den Button gedrückt wird, das Blatt "Kopiervorlage" dupliziert wird und abgefragt wird wie das neue Blatt heißen soll. 17. 2009, 20:43
# 6
MOF Koryphäe
Registrierung: 20. Excel vba tabellenblatt kopieren und umbenennen download. 06. 2008
Hi,
Sheets() = strBlattname
Code eingefügt mit dem MOF Code Converter
Gruß
Jürgen Aufgabenstellungen per PN werden grundsätzlich nicht beantwortet! 17. 2009, 20:50
# 7
Danke Problem gelöst
Genauso wenn Ihr statt den Namen, den Index der Tabelle benutzen würdet. Hier könnte der Nutzer die Tabellen in der unteren Leiste ebenfalls verschieben. Wenn Ihr diesen Bereich nicht schützt, wäre es sicherlich besser wenn man auf das Objekt Tabelle zugreift, der vom gewöhnlichen Excel Nutzer nicht änderbar ist 😉
Kurzes Beispielscript mit Berechnung
In diesem kurzen Beispielscript zeige ich Euch wie Ihr auf das Objekt Tabelle über den Namen direkt zugreifen könnt. Sub WerteAddieren ist der Prozedurname, den Ihr dann auch über Makros aufrufen könnt. End Sub am Ende des Scriptes zeigt VBA das dort das Ende unserer Prozedur ist. TabelleEins ist das Tabellen Objekt auf das wir zugreifen und mit Range einen Bereich oder eine Zelle auswählen können. FormulaLocal bedeutet, das wir eine Formel anwenden, die mit der lokalen Sprache geschrieben wurde. Jede Sprache hat ja seine eigenen Namen für Summe, Wenn etc.
1 2 3 4 5 6 7 8 9 10 11 12
Sub WerteAddieren () TabelleEins. Excel: Tabellenblatt per Makro kopieren und umbenennen? (Computer, VBA). Range ( "A1:C1"). Clear TabelleEins.