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

Verschieben aller Tabellenblätter bis aufs erste

Forumthread: Verschieben aller Tabellenblätter bis aufs erste

Verschieben aller Tabellenblätter bis aufs erste
01.03.2006 20:14:27
petra
Hallo,
würde gerne per Makro alle Tabellenblätter bis aufs erste Blatt von einer datei in die andere schieben.
geht das?
lg
petra
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Verschieben aller Tabellenblätter bis aufs ers
01.03.2006 22:15:45
Uduuh
Hallo,
in ein Modul vomn Mappe1:

Sub verschieben()
Dim i As Integer
With ThisWorkbook
For i = 2 To .Worksheets.Count
.Worksheets(i).Copy Workbooks("Mappe2.xls")
Next
End With
End Sub

Gruß aus’m Pott
Udo

Anzeige
AW: Verschieben aller Tabellenblätter bis aufs ers
02.03.2006 09:30:14
petra
Hallo Udo,
vielen Dank für deine Hilfe.
Klappt auch soweit. aber leider kommt der makro irgendwann an sein limit und zeigt mitten im prozess den debugger an. daher wollte ich gerne wissen, ob es neben kopieren auch einfach eine verschiebung der tabellenblätter gibt
also nicht .copy sondern .verschieben.
gibt es sowas?
lg
petra
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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