so langsam nervt mich dieses Select wirklich! Ich verstehe einfach nicht wie ich es wegbekomme. Kann mir mal jemand den nachfolgenden Code ohne SELECT oder ACTIVATE umschreiben?
Eigentlich kann es doch nicht so schwer sein. Irgendwie habe ich da wohl noch Verstaendinsprobleme.
Erich wird wahrscheinlich weinen, weil er es mir schon versucht hat tausend mal zu erklaeren. :-)
' find the right cell
Worksheets("DB").Activate
Columns("D:D").Activate
ActiveCell.Find(What:=ComboBox1, After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
' ActiveCell.Select ' must be deleted later
Dim pmpRow As Long
pmpRow = ActiveCell.Row
Vielen Dank im Voraus
Ciao
Gnilk