Bonjour,
Grace aux tutos de JB, j'ai "repris" un code qui permet de faire une recherche intuitive : dans mon cas, un textbox12 où j'écris le nom, une listbox (rechercheactions) qui se met à jour en fonction des lettres que je tape, une "Liste" qui comprend les éléments déjà enregistrés.
Mais.....(et je pense que c'est tout simple, mais malgré plusieurs essais, pas trouvé.....)
comment faire disparaitre (Me.Rechercheactions.Visible = false) si les lettres que je tape ne sont pas dans ma "Liste".......et donc que je crée une nouvelle action...?
En clair, quand je tape dans Textbox12 un nom et que la recherche est infructueuse, comment faire pour "retenir" le nom tapé et enlever la listbox Rechercheactions......
Merci pour votre aide,
Grace aux tutos de JB, j'ai "repris" un code qui permet de faire une recherche intuitive : dans mon cas, un textbox12 où j'écris le nom, une listbox (rechercheactions) qui se met à jour en fonction des lettres que je tape, une "Liste" qui comprend les éléments déjà enregistrés.
Mais.....(et je pense que c'est tout simple, mais malgré plusieurs essais, pas trouvé.....)
comment faire disparaitre (Me.Rechercheactions.Visible = false) si les lettres que je tape ne sont pas dans ma "Liste".......et donc que je crée une nouvelle action...?
En clair, quand je tape dans Textbox12 un nom et que la recherche est infructueuse, comment faire pour "retenir" le nom tapé et enlever la listbox Rechercheactions......
Code:
Me.Rechercheactions.Clear
Me.Rechercheactions.Visible = True
For i = LBound(Liste) To UBound(Liste)
If UCase(Liste(i)) Like "*" & UCase(Me.TextBox12) & "*" Then
On Error Resume Next
Me.Rechercheactions.AddItem Liste(i)
On Error GoTo 0
End If
Next i
Merci pour votre aide,
Dernière édition: