Mit Find-Methode erste beschriebene Zelle finden
15.02.2017 12:14:53
Tina
Hallihallo,
ich würde genre innerhalb einer Zeile, die erste Beschriebene Zelle finden und diese Adresse dieser Zelle speichern.Die Originaldatei ist sehr groß und es stehen unterschiedliche Werte in der jeweils ersten beschriebenen Zelle einer Zeile. Ich weiß leider nicht, wie ich nach einer Zelle mit dem Inhalt Zelle <> "" suchen kann.
Hier mein Code:
Sub FindAdress()
Dim Zelle As Range
With Worksheets(Tabelle1).Range("A4:I4")
Zelle = .Find(?)
If Not Zelle Is Nothing Then
firstadress = Zelle.Address
End If
End With
End Sub
https://www.herber.de/bbs/user/111494.xlsm
Ich würde mich sehr freuen, wenn mir einer von euch helfen kann ;)
Gruß, Tina