ich wollte ein macro schreiben, der ersten Eintrag in der Spalte findet.
könnt ihr mir vielleicht helfen?
danke im Voraus...
Viele Grüße
Anja
Sub test()
MsgBox Range("A:A").Find("*", searchdirection:=xlNext).Row 'Zeilennummer
MsgBox Range("A:A").Find("*", searchdirection:=xlNext) 'Inhalt der ersten gefüllten Zelle
End Sub
Sub erster_eintrag()
Dim rng As Range
Set rng = Cells(1, 1).End(xlDown)
MsgBox rng.Address
End Sub