Je voudrais comprendre la recherche en USF

[JACMIC]

Bonne année à tous,

J'ai du mal avec les recherches sur USF.
Ci joint un petit fichier pour, si possible, vous m'aidiez à comprendre.
Dans l'USF j'ai un combobox permettant de retrouver les données de la colonne A et un textbox ou devrais s'afficher la valeur en B correspondant à la ligne du choix du Combobox;

Je pense que pour beaucoup d'entre ce n'est qu'une formalité

J'aimerai bien que cela le devienne pour moi

Merci à vous

Jacmic

 

[Pierrot93]

Re : Je voudrais comprendre la recherche en USF

Bonjour Jamic

regarde le fichier en pièce jointe.

bonne soirée
@+

Edition : une bonne année également Skoobi

 

[skoobi]

Re : Je voudrais comprendre la recherche en USF

Bonsoir,

La recherche avec un userform n'est pas différente d'une recherche "classique" dans une macro.
Il faut utiliser la propriété "Find" comme ceci:

Private Sub ComboBox1_Change()
Set trouve = Columns(1).Find(ComboBox1.Value, LookIn:=xlValues)
If Not trouve Is Nothing Then
    TextBox1.Value = trouve.Offset(0, 1).Value
Else: MsgBox "Texte non trouvé."
End If
End Sub

Cette macro "évenement" est à mettre dans le code de l'USF.

Bonne Année 2008!

Edit: Bonne Année Pierrot93