wie kann ich ein Tabellenblatt um weitere 100Seiten kopieren (alle in einer Datei)? Ich kenne nur: rechte mausklick, kopieren, usw. Leider dauert diese Vorgang ewig bis ich 100 Seiten fertig kopieren kann.
Danke für den Tipps im Voraus!!
Gruß,
Pia
VBA-Code: |
Sub TabellenblattKopieren() Dim i As Integer For i = 1 To 100 Sheets("Tabelle1").Copy after:=Sheets(Sheets.Count) Next End Sub Gruß Jürgen |