Daten von Listbox zu Formular

Ich brauche etwas Hilfe mit einem Skript. Ich habe ein Formular mit einer Listbox und einigen Textfeldern. Wenn ich einen Eintrag der Listbox wähle, werden die übereinstimmenden Daten in diesen Textboxen angezeigt. Jetzt möchte ich mit Hilfe eines anderen Textfelds die Listbox durchsuchen.Daten von Listbox zu Formular

Ich habe ein Skript erstellt, das mein listfield durchsucht und den passenden Eintrag markiert.

For i = 0 To Me!lstPlanung.ListCount - 1 

      If Me!lstPlanung.Column(0, i) Like "*" & Me!sidSuche2.Text & "*" Then 

       Me!lstPlanung.Selected(i) = True 
       Exit For 

      End If 

     Next i

Aber mein Problem ist, dass der Eintrag und highlited nicht wirklich ausgewählt und die Daten werden in meinen Textfeldern nicht angezeigt, bis ich mit der Maus auf den Eintrag klicken highlited. Gibt es eine Möglichkeit, dieses kleine Problem zu lösen?

Quelle

2017-02-28 rel0aded0ne

Sie müssten die nach Update-Vorgang für das Listenfeld Diese

Me!lstPlanung.Selected(i) = True 
Call lstPlanung_AfterUpdate() 
      Exit For

rufen dann feuern das Ereignis, als ob Sie es angeklickt hatte. Möglicherweise müssen Sie das Nachaktualisierungsteil öffentlich machen.

Quelle

2017-02-28 10:36:44 Minty

Ich weiß nicht, was Sie mit 'Call lstPlanung_AfterUpdate()' bedeuten. Ich habe kein Sub namens lstPlanung. – rel0aded0ne

Sie müssen Code/Makro in dem After_Update-Ereignis in dem List-Feld oder einer Befehlsschaltfläche, die Ihre Textfelder ausfüllt, haben. Wie auch immer Sie die Textfelder füllen, das müssen Sie aufrufen/ausführen. – Minty

Sorry, aber ich verstehe es nicht. Ich habe ein Makro, das die Daten aus der Listbox in meinen Textfeldern auf after_update() 'anzeigt. Das Makro sieht folgendermaßen aus: = '" [SID] = "&" '"& [Bildschirm]. [ActiveControl] &"' "'. – rel0aded0ne

Daten von Listbox zu Formular

Antwort

Verwandte Themen