Thema Datum  Von Nutzer Rating
Antwort
11.06.2015 10:00:01 Berni66
NotSolved
Blau ListBox1.ListIndex = 0 ...einmal aktiviert und inaktiv?
12.06.2015 17:31:42 Gast15624
NotSolved
12.06.2015 18:49:59 Gast35533
NotSolved

Ansicht des Beitrags:
Von:
Gast15624
Datum:
12.06.2015 17:31:42
Views:
435
Rating: Antwort:
  Ja
Thema:
ListBox1.ListIndex = 0 ...einmal aktiviert und inaktiv?
Private Sub ListBox1_Click()

   '...

    'Nur wenn ein Eintrag selektiert/markiert ist
    If ListBox1.ListIndex >= 0 Then
    
        lZeile = 2 'Start in Zeile 3, Zeile 2 sind ja die Überschriftrn
        'Schleife solange etwas in der ersten Spalte in Tabelle 1 drin steht
        Do While Trim(CStr(Tabelle1.Cells(lZeile, 1).Value)) <> ""
        
            'Wenn wir den Namen aus der ListBox1 in der Tabelle1 Spalte 1
            'gefunden haben, übertragen wir die anderen Spalteninhalte
            'in die TextBoxen!
            If ListBox1.List(ListBox1.ListIndex) = Trim(CStr(Tabelle1.Cells(lZeile, 1).Value)) Then
            
                'TextBoxen füllen
                '...

Weiterhin solltest du ListBox1_Change anstatt ListBox1_Click verwenden.

 

Gruß


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
11.06.2015 10:00:01 Berni66
NotSolved
Blau ListBox1.ListIndex = 0 ...einmal aktiviert und inaktiv?
12.06.2015 17:31:42 Gast15624
NotSolved
12.06.2015 18:49:59 Gast35533
NotSolved