Thema Datum  Von Nutzer Rating
Antwort
03.03.2019 13:17:04 Simon
NotSolved
Blau Suchfunktion mit ComboBox
03.03.2019 13:33:12 Crazy Tom
Solved
03.03.2019 16:58:26 Simon
NotSolved

Ansicht des Beitrags:
Von:
Crazy Tom
Datum:
03.03.2019 13:33:12
Views:
468
Rating: Antwort:
 Nein
Thema:
Suchfunktion mit ComboBox

Hallo

 

versuch es mal so

 

Private Sub ComboBox1_Change()
    Dim finden As Range
    With Worksheets("Tabelle7")
        Set finden = .Range("A8:A57").Find(What:=ComboBox1.Text, LookIn:=xlValues, lookat:=xlWhole)
        If Not finden Is Nothing Then
            TextBox2.Value = .Cells(finden.Row, 2).Value
        End If
    End With
End Sub

 

ich habe die Anweisung ins "With" gestellt

das ermöglicht dir die Suche und Ausgabe, auch wenn das Tabellenblatt nicht aktiv ist

beachte dabei die Punkte vor Cells und Range, die referenzieren innerhalb der With-Anweisung auf das Tabellenblatt

 

MfG Tom


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
03.03.2019 13:17:04 Simon
NotSolved
Blau Suchfunktion mit ComboBox
03.03.2019 13:33:12 Crazy Tom
Solved
03.03.2019 16:58:26 Simon
NotSolved