Ich habe hier eine große Excel-Tabelle mit mehreren Registern (pro Team ein Register - 61 insgesamt), in denen jeweils die Namen der diversen Teammitglieder stehen.
Name und Vorname sind gemeinsam in eine Zelle eingetragen
Nun soll ein Makro erstellt werden, was es erlaubt, nach den Namen (ohne Vorname!) zu suchen.
Erschwerend kommt hinzu, dass die Leute öfters mal doppelt und dreifach vorkommen und ich jeden einzelnen Datensatz angezeigt bekommen lassen muß.
Ich hab mich schonmal etwas umgeschaut und auch ein Makro gefunden, was mir eine grundsätzliche Suchfunktion erlaubt:
Sub test1()
Dim Zelle As Range, Tabelle As Worksheet, s As String
s = InputBox("Bitte Suchnamen eingeben!")
If s <> "" Then
For Each Tabelle In ThisWorkbook.Worksheets
For Each Zelle In Tabelle.UsedRange
If Zelle = s Then
Tabelle.Select
Zelle.Select
Exit Sub
End If
Next Zelle
Next Tabelle
MsgBox "Begriff nicht gefunden!", 48, "Hinweis"
End If
End Sub
Hat jemand eine Idee, wie ich das erweitern muß?
Oder gibt es vielleicht schon ein Makro, was genau das kann, was ich brauche?