ActiveCell.Row (unterste Zeile finden)
25.05.2003 22:50:34
Hans Jürgen
das Problem hat mich schon wieder eingeholt. Ich dachte, dass ich mit folgendem Code die Variable "unten" mit der Zeilennummer der untersten Zeile meines Sheets belegen kann:
Dim unten As Integer
Application.Goto Reference:="R3C1"
Selection.End(xlDown).Select
Set unten = ActiveCell.Row
Anschließend wollte ich mit
If ActiveCell.Row >= unten Or ActiveCell.Row <= 3 Then
Beep
Else
...
End If
eine Fehlermeldung ausgeben, dass ich mich ausserhalb meines bisherigen Wertebereiches befinde.
War aber nichts, bekomme schon bei "Set unten = " eine Fehlermeldung. Ist bestimmt wieder was ganz Dummes, aber was?