Private Sub Tel_Suchen_Telefon_B_Click()
fund = Application.WorksheetFunction _
.Match(Tel_Suchen_Telefon, Range("Tel_D_Tel"), 0)
Range("Aktuell") = fund
Daten_zeigen
End Sub
Tel_Suchen_Telefon = Textbox im Formular dadurch Format Text
Tel_D_Tel = ist der Bereich in dem das Makro suchen soll, aber die Werte in diesem Bereich liegen im Zahlen Format vor.
Frage Was muß ich ändern um den Befehl Match also Vergleich benutzen zu können und die Fundstelle (die Zeilennummen) als ergebnis in die Zelle Aktuell zu schreiben und dann das Makro Daten_zeigen aufzurufen.
Das Makro läuft fehlerfrei wenn ich einen Namen suche. Da sind halt sowohl das such als auch das Bereichsformat gleich.
Danke für eure Hilfe