Habe eine kleine Telefonliste gemacht , aus der Combobox wird der Name angewählt , und unten in den Textboxen werden Name Geb Tele und Adresse angezeigt.
Ich lass die ausgewählte Zeile selektieren , und die UF besitzt einen Löschbutton der immoment
ActiveCell.EntireRow.Delete
so aussieht.
Meine Zeile wird zwar gelöscht bekomme jedoch immer die gleiche Meldung mit Range fehlerhaft in meiner auslesezeile
Private Sub ComboBox1_Change()
Sheets(1).Select
Dim Zelle As Range
With Worksheets(1)
Set Zelle = .Columns(1).Find(what:=ComboBox1, lookat:=xlWhole, LookIn:=xlValues) (
Habe schon versucht nach dem Löschen die Combobox mit Combobox.clear oder Rowsource neu einlesen lassen , aber hat alles nichts geholfen und steh auf dem Schlauch :(
Hat von euch jemand eine zündende Idee dafür ?
Vielen Dank im vorraus
https://www.herber.de/bbs/user/96423.xlsm