Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Clique sur un nom

maval

XLDnaute Barbatruc
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
 

Pièces jointes

  • Combobox ouvrir sur le nom.xlsm
    44.6 KB · Affichages: 28
  • Combobox ouvrir sur le nom.xlsm
    44.6 KB · Affichages: 28

phlaurent55

Nous a quittés en 2020
Repose en paix
Re : Clique sur un nom

Bonjour Max,

Code:
    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
Code:
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
 
Dernière édition:

M12

XLDnaute Accro
Re : Clique sur un nom

Bonjour à tous,

Un peu à la traine, Tant pis
 

Pièces jointes

  • Combobox ouvrir sur le nom.xlsm
    45.5 KB · Affichages: 26
  • Combobox ouvrir sur le nom.xlsm
    45.5 KB · Affichages: 23

Discussions similaires

Réponses
9
Affichages
327
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…