ganz kurze Frage:
Wie kann ich einen Wert in einem Namensbereich finden, um auf die betreffende Zelle zuzugreifen?
Vielen Dank und viele Grüße
Jonathan
Sub a()
Dim such As Variant, rngCell As Range
such = 10
Set rngCell = Range("MeinName").Find(such, LookIn:=xlValues, lookat:=xlWhole, MatchCase:=True)
If Not rngCell Is Nothing Then
MsgBox rngCell.Address
rngCell.Select
Else
MsgBox "nicht vorhanden"
End If
End Sub
Gruß GerdDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen