Ich möchte in einer Liste mit Maschineninventarnummern den zugehörigen Wert aus der Spalte nebendran auslesen, bzw. eine Variable damit belegen.
Gibt es vielleicht eine bessere Methode als diese:
Danke im Vorraus
On Error Resume Next ' 1. Wert
Cells.Find(What:="2042M01", After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False).Activate
Gesuchter_Wert1 = ActiveCell.Offset(0, 2)
' 2. Wert
Cells.Find(What:="2051M01", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
Gesuchter_Wert2 = ActiveCell.Offset(0, 2)
...
Also sowas wie
"With cells.value("2081M01") lese Wert nebendran"
Gruß
F.