Zeilen zählen in Selection
11.05.2014 20:12:23
moods
Es funktioniert auch soweit, nur falls jemand auf die Idee kommt die Selection von unten nach Oben zu ziehen bekomme ich in den Labels die falsche Daten angezeigt.
Gibt da ne Möglichkeit?
Label10.Caption = Cells(ActiveCell.Row, 4)
Label11.Caption = Cells(ActiveCell.Row + Selection.Rows.Count, 4)
Danke und Gruss
Anzeige