Bereichauswählen mit Hilfe von ActiveCell
26.09.2003 11:34:56
urs
Wie kann ich diesen Kode zusammenfassen?
Range("J10") = ActiveCell.Value
Range("J12") = Cells(ActiveCell.Row + 2, ActiveCell.Column)
Range("J13") = Cells(ActiveCell.Row + 3, ActiveCell.Column)
Range("J14") = Cells(ActiveCell.Row + 4, ActiveCell.Column)
Range("J15") = Cells(ActiveCell.Row + 5, ActiveCell.Column)
Range("J16") = Cells(ActiveCell.Row + 6, ActiveCell.Column)
vielen Dank für Eure Hilfe
Urs