Werte Einfügen
20.02.2006 12:57:25
Heinz
Habe unteren Code mittels Recorder aufgezeichnet.
Nur möchte ich nicht wie unten "KW6" sondern das ändert sich immer ,"KW7,"KW8" usw.Nach den Daten einfügen wir das Blatt mit "KW7"usw.wieder gelöscht.
Der Bezug sollte also nur auf "KW" gehen.
Weiters wie unten von "KW6" F7 in "Wochenplan"F7 von "KW"6 K7 in "Wochenplan" K7
Könnte mir Bitte den Code jemand abändern ?
Danke,Heinz
Private Sub CommandButton4_Click()
Sheets("KW6").Select
Range("F7").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Wochenplan").Select
Range("F7").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub