Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1700to1704
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tabellenblatt kopieren

Tabellenblatt kopieren
09.07.2019 10:00:37
Georg
Liebe Mitglieder, eine scheinbar einfache Frage:
Ich möchte aus einer bestehenden Arbeitsmappe 2 Blätter in eine neue Arbeitsmappe kopieren:
Bekomme aber bei
.copy before....
die Fehlermeldung "Index außerhalb des gültigen Bereichs"
Woran hakt es?
Vielen Dank und Grüße G
Sub Kopieren()
Dim wbNeu As Workbook
Set wbNeu = Workbooks.Add
ThisWorkbook.Activate
With ThisWorkbook.Worksheets("Fehlzeiten")
.Copy before:=Workbooks("wbneu").Sheets(1)
End With
With ThisWorkbook.Worksheets("EinDienst")
.Copy before:=Workbooks("wbneu").Sheets(1)
End With
End Sub

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt kopieren
09.07.2019 10:07:44
UweD
Hallo
so...
Sub Kopieren()
Dim wbNeu As Workbook
Set wbNeu = Workbooks.Add
ThisWorkbook.Activate
    
    With ThisWorkbook.Worksheets("Fehlzeiten")
            .Copy before:=wbNeu.Sheets(1)
    End With
    With ThisWorkbook.Worksheets("EinDienst")
            .Copy before:=wbNeu.Sheets(1)
    End With
End Sub

LG UweD
Anzeige
AW: Tabellenblatt kopieren. VIELEN DANK..
09.07.2019 10:15:28
Georg
Uwe, Gruß G
gern geschehen owT
09.07.2019 10:58:42
UweD

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige