AW: letzte Zeile mit bestimmten wert finden
10.07.2009 10:42:10
Tino
Hallo,
die Suchfunktion von Excel beherrscht auch die Rückwertssuche.
Die Parameter kannst Du auch in der Hilfe nachlesen.
Beispiel:
Sub Beispiel()
Dim SuchBegriff
Dim rngFundZelle As Range
SuchBegriff = "keine Ahnung?"
Set rngFundZelle = Sheets("Tabelle1").UsedRange.Find(SuchBegriff, , xlValues, xlWhole, xlByRows, xlPrevious, False, False)
If Not rngFundZelle Is Nothing Then
MsgBox "gefunden in " & rngFundZelle.Address(0, 0)
Else
MsgBox "nix gefunden"
End If
End Sub
Gruß Tino