Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Treffer aus ComboBox Anzeigen

Forumthread: Treffer aus ComboBox Anzeigen

Treffer aus ComboBox Anzeigen
09.07.2021 15:30:36
oraculix
Hallo
Ich habe ein Makro das manchmal funktioniert und manchmal zeigt es ein Fehler an.
Laufzeitfehler '91':
Objektvariable oder With-Blockvariable nicht festgelegt.
Frage: Was muss ich ändern damit es ohne Fehler Läuft?
Der Sinn des ganzen ist es in der ersten Zeile bis CS1 alles zu finden wenn ich es in der Combobox auswähle. Der Gefundene Textwert wird durch ein Formel ausgegeben.
Beispiel: Zelle A1 steht
="Harrison Ford "&ANZAHL2(A2:A500)
Zelle B1 steht
="Tom Cruise "&ANZAHL2(B2:B500)
Zelle C1 steht
="Denzel Washington "&ANZAHL2(C2:C500)
Das Ganze geht bis CS1 in Tabelle "Schauspieler"

Private Sub ComboBox1_Change()
Me.Range("A1:CS1").Find(ComboBox1.Text & "*", LookAt:=xlWhole).Select
End Sub
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Treffer aus ComboBox Anzeigen
09.07.2021 15:49:21
Nepumuk
Hallo,
so:

Private Sub ComboBox1_Change()
Dim objCell As Range
Set objCell = Me.Range("A1:CS1").Find(ComboBox1.Text & "*", LookAt:=xlWhole)
If Not objCell Is Nothing Then
Call objCell.Select
Set objCell = Nothing
Else
Call MsgBox("Kein Treffer.", vbExclamation, "Hinweis")
End If
End Sub
Gruß
Nepumuk
Anzeige
AW: Treffer aus ComboBox Anzeigen
09.07.2021 16:11:08
oraculix
Hallöchen! Danke erstmal aber,
Es kommt zwar kein Fehler aber dafür immer Kein Treffer?
AW: Treffer aus ComboBox Anzeigen
09.07.2021 16:14:44
Nepumuk
Hallo,
kann ich ohne die Mappe nicht nachvollziehen.
Gruß
Nepumuk
AW: Treffer aus ComboBox Anzeigen
09.07.2021 16:22:13
oraculix
Bin selbst draufgekommen habe LookAt:=xlPart) eingefügt jetzt geht es Deine Schule hat geholfen Danke.
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige