Pb dans ma macro? Résolu/Fermé

Question

Bonjour, 


J'ai un fichier pour la gestion de personnel  et J'ai un petit problème dans ma macro je pense que c'est a cause d'une  une zone de sélection incorrect.
Je m'explique lorsque j'ouvre le formulaire en W2 et que je vais dans la case rechercher nom ,je ne retrouve pas 2 noms (SQF et GVEZGR) j'ai modifié plusieurs fois ce code:

Private Sub UserForm_Initialize()
    I = 2
    ' Alimenter la liste des noms à l'initialisation du formulaire
    For I = 4 To Range("A3").CurrentRegion.Rows.Count
        Me.L_Choix_Nom.AddItem Cells(I, 1) & " " & Cells(I, 2)
    Next I
    Nouveau = True
    ' Placer le curseur dans le champ Nom
    Me.T_Nom.SetFocus
End Sub


Mais soit, je perds tout soit il me manque des noms etc.....
Je vous joint le fichier afin de visualiser mon soucis

Merci de votre aide


https://www.cjoint.com/?DBjpmeIVfBp

Configuration: Windows 7 / Mozilla 11.0

eriiic · Answer

Bonjour, 

une autre façon de faire, sans boucle :
Private Sub UserForm_Initialize()
    ' Alimenter la liste des noms à l'initialisation du formulaire
    L_Choix_Nom.List = Range("A4").Resize(Cells(Rows.Count, 1).End(xlUp).Row - 3, 1).Value
    Nouveau = True
    ' Placer le curseur dans le champ Nom
    Me.T_Nom.SetFocus
End Sub
Quand tu mets du code pense à le mettre en forme avec l'icone <>

eric

Pb dans ma macro?

1 réponse

Discussions similaires