Discussion :

[Marc31]

Bonjour,

j'ai fais un outil de recherche (userform8) pour rechercher un certain nombre de personne.
Puis une fois que j'ai choisi là personne, en cliquant dessus, j'aiemrais appuyer sur un bouton "modifier" que ça m'ouvre "userform2" et que ça remplisse nom de la personne dans la combobox1 de l'userform2.
Je sais pas si je me fais bien comprendre? Si quelqu'un pouvait m'aider, merci.
Bonne journée

[Theze]

Bonjour,

Ici, pour l'exemple, je suppose que le choix (dans la Form "UserForm8") est fait dans une ListBox (adapter sinon) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Private Sub CommandButton1_Click()
 
    'charge le formulaire mais ne lui donne pas encore le focus
    Load UserForm2
 
    'défini le texte du combobox
    With Me.ListBox1
 
        UserForm2.ComboBox1.Text = .List(.ListIndex)
 
    End With
 
    'affiche le formulaire qui a ensuite le focus
    UserForm2.Show
 
End Sub

Hervé.

[Marc31]

Merci c'est exactement ça mais au lieu de prendre la premiere colonne de la listbox (userform8) c'est possible qu'il prenne là seconde?

[Theze]

Bonjour,

C'est tout à fait possible, il faut juste indiquer l'index de la colonne (attention, base 0 donc, 2 ème colonne = 1) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Private Sub CommandButton1_Click()
 
    'charge le formulaire mais ne lui donne pas encore le focus
    Load UserForm2
 
    'défini le texte du combobox
    With Me.ListBox1
 
        UserForm2.ComboBox1.Text = .List(.ListIndex, 1)
 
    End With
 
    'affiche le formulaire qui a ensuite le focus
    UserForm2.Show
 
End Sub

Hervé.

[Marc31]

Merci beaucoup pour le code il marche super!!!
En fait j'ai modifié la place des colonnes.