Herbers Excel-Forum - das Archiv

Tabelle kopieren

Bild

Betrifft: Tabelle kopieren
von: Giuseppe
Geschrieben am: 12.11.2003 16:47:54
Hallo Freunde,
mir passiert etwas komisches..........
mit Hilfe der Recherche und Macrorecorder habe ich mir ein Code gebastelt.



Sub Makro5()
Cells.Select
Selection.Copy
Sheets.Add
ActiveSheet.Paste
ActiveWindow.DisplayGridlines = False
BlattName = ActiveCell.Worksheet.Name
ZelleA1 = Cells(1, 1)
Sheets(BlattName).Select
Sheets(BlattName).Name = ZelleA1
End Sub


...und läuft nicht!!! Error: Die Methode 'Paste' für das Objekt '_Worksheet' ist
fehlgeschlagen, und wird die Tabelle ohne Name kopiert (z.B: Tabelle7).
Wenn ich von der kopierte Tabelle d. Makro aufrufe geht es.
Und noch was.... Ab diese Moment alle Makros in meine Symbolleiste die mit eine
Tabelle wahlen zu tun haben gehen nicht mehr.

Was ist in der Code falsch?

Danke im voraus für eure Hilfe
Giuseppe
Bild

Betrifft: AW: Tabelle kopieren
von: Werner
Geschrieben am: 12.11.2003 17:12:49
Hallo Giuseppe,

Bei mir funktioniert das Makro 1a!

Du kannst jedoch das Blatt nur 1-mal Kopieren, da ja
in Zelle A1 der Name steht, und der kann nur 1-mal vorkommen.

Gruss Werner
Bild

Betrifft: AW: Tabelle kopieren
von: Giuseppe
Geschrieben am: 12.11.2003 17:55:30
Hallo Werner,
Danke für deine Antwort.
Bei mir funktioniert auch, außer mit diese eine Tabelle!!!
Warum nicht... Ich habe keine Ahnung.
Das komische daran ist, dass die kopierte Tabelle lässt sich ohne Probleme
weiter kopieren und auch mit der richtige Name (A1).
Kannst du oder jemand mir erklären warum so ist?
Bild

Betrifft: AW: Tabelle kopieren
von: Werner
Geschrieben am: 12.11.2003 18:08:48
Hallo Giuseppe,

Kopieren kannst du sie immer, aber der Name der in A1 steht
muss jeweils geändert werden!
Beispeil;
Der Blattname ist Tabelle1 und in A1 steht Tabelle1,
dann gibt es einen Fehler und die neue Tabelle heisst dann zB. Tabelle2
den du kannst jeden Namen nur 1-mal vergeben.

Gruss Werner
Bild

Betrifft: AW: Tabelle kopieren
von: giuseppe
Geschrieben am: 12.11.2003 18:10:36
Danke werner
Bild

Betrifft: Danke für die Rückmeldung ! oT
von: Werner
Geschrieben am: 12.11.2003 19:58:26
Bild
Excel-Beispiele zum Thema " Tabelle kopieren"
Suche über mehrere Tabellen Benennen von Tabellenblättern mit Monatsnamen
Druckseitenlinien im Tabellenblatt Tabellenblattnamen in ein Listenfeld einlesen
Suchbegriff über mehrere Tabellenblätter suchen. Tabellenblätter benennen
Tabellenblatt auswählen Zustand von Tabellenblatt-Checkboxes ermitteln
Tabellenblattnamen der VBE-Projekte ändern Tabellenblattnamen nach Datum