kopieren aber nur den wert
13.04.2005 20:32:56
max
ich habe vor kurzem einen sehr hilfreichen code zum kopieren bekommen, danke noch einmal für die Hilfe
Nun,nach mehrmaligem anwenden,möchte ich gerne den code geändert haben und zwar dahingehend das nicht die ganze celle inklusive den Formeln kopiert wird sonder nur der wert der celle, kann mir dabei noch einmal jemand behilflich sein?
Ich habe hier den code noch mal mit beigefügt
Private Sub CommandButton1_Click()
Dim zelle As Range
For Each zelle In Range("A1:A10")
If zelle.Value <> "" Then zelle.Copy zelle.Offset(0, 1)
Next
End Sub
Es wäre sehr nett und danke im vorraus
mfG max
Anzeige