Tabellenblatt per Makro kopieren

Forumthread: Tabellenblatt per Makro kopieren
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Tabellenblatt per Makro kopieren

25.08.2004 17:56:20

Schürmann

Hallo,
gibt es ein Makro mit dem es möglich ist Tabellenblatt1 automatisch nach Tabellenblatt2 zu kopieren?
Mario

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tabellenblatt per Makro kopieren

25.08.2004 18:24:15

Frank
AW: Tabellenblatt per Makro kopieren

25.08.2004 18:35:41

Schürmann
AW: Tabellenblatt per Makro kopieren

25.08.2004 19:10:15

Frank

AW: Tabellenblatt per Makro kopieren

25.08.2004 18:24:15

Frank

Hi Mario,
folgendes sollte klappen. Kopiere einfach folgendes in ein Modul.


Sub TB_kopieren()
Sheets("Tabelle1").Select
Sheets("Tabelle1").Copy After:=Sheets(1)
Application.ActiveSheet.Name = "Tabelle " & Application.Worksheets.Count
End Sub

MfG
Frank

AW: Tabellenblatt per Makro kopieren

25.08.2004 18:35:41

Schürmann

Hallo Frank,
danke für den Tip. Es funktioniert soweit ganz gut. Ich möchte den Inhalt aber in ein bereits vorhandenes Datenblatt kopieren. Bisher ist es so, das ein neues Datenblatt erstellt wird. Wie muß ich den Befahlssatz abändern?
Mario

AW: Tabellenblatt per Makro kopieren

25.08.2004 19:10:15

Frank

Hi Mario,
versuch folgendes, die Sheets musst du wohl noch anpassen.


Sub TB_kopieren_2()
Sheets("Tabelle1").Select
Cells.Select
Selection.Copy
Range("A1").Select
Sheets("Tabelle2").Select
ActiveSheet.Paste
Range("A1").Select
Application.CutCopyMode = False
End Sub

MfG
Frank