XL 2013 Clique sur un nom

[maval]

Bonjour

Je suis à la recherche d'un code pour lorsque je clique sur un nom dans ma feuille "B" le formulaire s'ouvre avec le nom que j'ai cliqué dans la combobox.

Je vous remercie d'avance

 

[phlaurent55]

Re : Clique sur un nom

Bonjour Max,

    Private Sub UserForm_Initialize() 'Chargement de la liste au lancement de l'UserForm
    
    Dim i
    For i = 2 To 2000 'Liste des Noms
       CBox_Noms.AddItem Sheets("BdD Acteurs").Cells(i, 2)
    Next
    CBox_Noms.ListIndex = ActiveCell.Row - 2
    
End Sub

La ligne ajoutée est:
CBox_Noms.ListIndex = ActiveCell.Row - 2

ou comme ceci pour éviter d'avoir une série de lignes vides en bas de la Combobox

Private Sub UserForm_Initialize() 'Chargement de la liste au lancement de l'UserForm
    
    Dim i
    For i = 2 To Sheets("BdD Acteurs").Range("B1").End(xlDown).Row 'Liste des Noms
       CBox_Noms.AddItem Sheets("BdD Acteurs").Cells(i, 2)
    Next
    CBox_Noms.ListIndex = ActiveCell.Row - 2
    
End Sub

à+
Philippe

 

[Lolote83]

Re : Clique sur un nom

Salut MAVAL,
Peut être comme ceci
@+ Lolote83

 

[maval]

Re : Clique sur un nom

Bonjour Lolote83, Philippe

Je te remercie exactement la recherche

Bonne journée

 

[phlaurent55]

Re : Clique sur un nom

Re,

Bonjour Lolote83, Philippe

Je te remercie exactement la recherche

Bonne journée

Je viens d'éditer mon premier message et d'y ajouter une seconde solution

à+
Philippe

 

[M12]

Re : Clique sur un nom

Bonjour à tous,

Un peu à la traine, Tant pis

 

[maval]

Re : Clique sur un nom

Re Philippe

Nickel je te remercie