Tabelle kopieren

05/03/2008 - 17:31 von Harry | Report spam
Hallo NG

Ich möchte eine Tabellenvorlage 52 mal kopieren.

Grund Dafür ist: Ich habe eine Tabellenvorlage die mit KW01 bezeichnet ist.
Ich brauche diese Tabelle 52mal (für jede Woche eine neue Tabelle)

Ist es möglich mit einem Befehl oder Macro die Tabelle KW01 52mal zu
kopieren und die weiteren Tabellen sollten dann die Bezeichnung KW02
KW03 KW04 usw. haben

mfg. Harry K
 

Lesen sie die antworten

#1 Claus Busch
05/03/2008 - 17:44 | Warnen spam
Hallo Harry,

Am Wed, 05 Mar 2008 17:31:31 +0100 schrieb Harry:

Ist es möglich mit einem Befehl oder Macro die Tabelle KW01 52mal zu
kopieren und die weiteren Tabellen sollten dann die Bezeichnung KW02
KW03 KW04 usw. haben



probiers mal so:

Sub Blattkopieren()

Dim i As Integer

For i = 2 To 53
Sheets("KW01").Copy After:=Sheets(i - 1)
ActiveSheet.Name = "KW" & Format(i, "00")
Next

End Sub


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2 / Vista Ultimate
Office 2003 SP2 / 2007 Ultimate

Ähnliche fragen