Sheet kopieren, einfügen und umbenennen
26.03.2009 22:31:22
Mandy
ich muss doch noch mal was fragen:
Ich möchte in meiner Datei von einem sheet einen Kopie machen , neu einfügen und mit Namen benennen. das mach ich so:
Sheets("Temp").Copy after:=Sheets("Temp")
ActiveSheet.Name = "Ablage"
Dazu nun zwei Fragen:
1. Das neue Sheet "Ablage" wird beim einfügen immer an erster Stelle positioniert. Ist es möglich, dass das sheet beim kopieren an den Schluss der schon bestehenden sheets kommt ?
2. Es kommt mal vor, dass ich zwei oder drei dieser Sheets einfügen muss, kann man bei der Namensvergabe so was machen mit einer Nummerierung, also das erste kopierte sheet soll "Ablage 01" heisen. Wenn ich noch mal den Code ausführe und es gibt schon ein sheet "Ablage 01" , sol das nächste "Ablage 02" heisen usw.
Die neuen sheet solllen dann immer an den Schluss eingefügt werden.
Ist das machbar ?
Danke schon mal
Mandy