optimisation combobox

moutchec · 29 Août 2018

bonjour le forum,
bonjour à tous,
je cherche de l'aide pour optimiser le 'dropdown' de la liste déroulante de ma combobox qui se met en route quelquefois de façon inopportune. j'en ai besoin pour faire un choix rapide dès le début de la saisie.
code : Me.CmbB_Code_Produit.DropDown
est-il possible de conditionner le déclenchement du 'dropdown' à la saisie d'au moins un caractère dans le combobox?
merci d'avance.
Moutchec.

Lone-wolf · 29 Août 2018

Bonjour Moutchec, le Forum 🙂

Un exemple pris chez Jacques Boisgontier.

VB:

Private Sub ComboBox1_Change()
  If Me.ComboBox1 <> "" Then
    Set d1 = CreateObject("Scripting.Dictionary")
    tmp = UCase(Me.ComboBox1) & "*"
    For Each c In Sheets("BD").[liste]
      If UCase(c) Like tmp Then d1(c.Value) = ""
    Next c
    Me.ComboBox1.List = d1.keys
    Me.ComboBox1.DropDown
    [e2] = Me.ComboBox1
  End If
End Sub

optimisation combobox

moutchec

XLDnaute Occasionnel

Lone-wolf

XLDnaute Barbatruc

Discussions similaires

optimisation combobox

moutchec

XLDnaute Occasionnel

Lone-wolf

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency