Pb dans ma macro?

Résolu

xav37300 Messages postés 51 Date d'inscription Statut Membre Dernière intervention -
xav37300 Messages postés 51 Date d'inscription Statut Membre Dernière intervention - 9 févr. 2014 à 18:49

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

A voir également:

Pb dans ma macro?
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Jitbit macro recorder - Télécharger - Confidentialité
Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro maker - Télécharger - Divers Utilitaires
Macro word - Guide

1 réponse

Réponse 1 / 1

eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention 7 275

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

xav37300 Messages postés 51 Date d'inscription Statut Membre Dernière intervention

Merci beaucoup c'est super cela fonctionne
Merci de ton aide
je marque comme résolu!

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro

recup couleur de cellule sans macro

EXCEL transformer chiffres en lettre -facture

convertir des chiffres en lettres avec une unique formule

Votre réponse

Discussions similaires