Automatisch Werte einfügen
23.04.2009 10:30:21
Ralf
ich habe einen Code, der für einen anderen Zweck erstellt wurde und
diesen auch supergut erfüllt.
(Es sollen nämlich aus einem bestimmten Bereich Daten kopiert werden !)
Nun möchte ich diesen Code so abändern,
daß er nur die Werte in Tab. zwei einfügt, da im Quellbereich jetzt Formeln stehen :-)
Hat hierzu jemand eine Idee, was ich da genau abändern muß ?
Bin für jeden Tipp dankbar !!!
Viele :-) Grüße aus dem Teutoburger Wald
Ralf
'Hier ist er :
Private Sub CommandButton1_Click()
Dim WS1 As Worksheet, WS2 As Worksheet
Set WS1 = Worksheets("eins")
Set WS2 = Worksheets("zwei")
WS1.Range("C2:L2").Copy WS2.Range("A65536").End(xlUp).Offset(1, 0)
End Sub
Anzeige