mit diesem makro suche ich nach einen namen in einer tabelle.(userform,listbox,combobox)
die einträge stehen in einer listbox.der name wird gleichzeitig in der listbox u.in der tabelle gefunden u.markiert.
dies funktioniert aber nur mit windows xp.
was muss ich ändern damit es auch mit einer älteren version funktioniert.
Private Sub ComboBox2_Change()
Dim lZeile As Long
Sheets("Abstammungen").Activate
lZeile = Sheets("Abstammungen").Cells(Rows.Count, 1).End(xlUp).Row + 1
'Cells(lZeile, 1).Value = ComboBox2.Value
'Call UserForm1_Activate
On Error GoTo Ende
Columns("B:B").Select
Selection.Find(What:=(ComboBox2.Value), After:=ActiveCell, LookIn:=xlFormulas, Lookat _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Select
SearchRow = ActiveCell.Row - 1
ListBox1.ListIndex = SearchRow
Ende:
End Sub
mfg rolf