Bereichauswählen mit Hilfe von ActiveCell

Bild

Betrifft: Bereichauswählen mit Hilfe von ActiveCell
von: urs
Geschrieben am: 26.09.2003 11:34:56

Liebe Profis

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

Bild


Betrifft: AW: Bereichauswählen mit Hilfe von ActiveCell
von: chris
Geschrieben am: 26.09.2003 11:39:07


Range("J10") = ActiveCell.Value
for i=12 to 16
cells(i,10)=Cells(ActiveCell.Row + i-10, ActiveCell.Column)
next

gruß
Christian


Bild


Betrifft: Vielen Dank !!!!
von: urs
Geschrieben am: 26.09.2003 14:36:17

mit freundlichem Gruss urs


 Bild

Beiträge aus den Excel-Beispielen zum Thema " warum stimmt das datum nicht??"