Menu

CMB qui ne fonctionnent plus [Résolu]

Messages postés
628
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
18 mai 2019
- - Dernière réponse : JCB40
Messages postés
628
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
18 mai 2019
- 20 mars 2019 à 13:26
Bonjour,
Après un crash de mon pc j'ai des problèmes avec un userform surtout avec les cmb,je n'arrive plus
à aller chercher les noms qui se trouvent sur une autre feuille.
Il s'agit de mes comptes personnels
Je vous mets le code VBA "ce code avait était créé par Mike 31 que je salue"
Pouvez-vous svp me dire ce qui cloche
Cordialement

Private Sub UserForm1_Activate()
' Combobox
For L = 1 To F02.Range("A" & Rows.Count).End(xlUp).Row
Cmb_Nom.AddItem F02.Range("A" & L)
Next

For L = 6 To F02.Range("N" & Rows.Count).End(xlUp).Row
Cmb_Paiement.AddItem F02.Range("N" & L)
Next
TxtDate.Locked = True
End Sub

Private Sub Cmb_Nom_Change()

End Sub

Private Sub Cmb_Paiement_Change()

End Sub




Configuration: Windows / Firefox 65.0
Afficher la suite 

Votre réponse

2 réponses

Messages postés
4498
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
17 mai 2019
230
0
Merci
Bonjour JCB, bonjour le forum,

Difficile de pouvoir t'aider si tu ne nous fournis pas plus d'éléments !...
Pouvez-vous svp me dire ce qui cloche
Commence par vous dire où ça cloche (quelle ligne du code plante) et quel est le message d'erreur...
Sinon tu utilises une variable F02 pour désigner un onglet. Dans le bout de code que tu daignes montrer, cette variable n'a ni été déclarée (ça n'empêche pas le code de fonctionner) ni initialisée (ça oui, ça fait planter)...
Commenter la réponse de ThauTheme
Messages postés
628
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
18 mai 2019
64
0
Merci
Bonjour

Merci pour ton aide
J'ai trouvé avec le crash,je ne sais pas pourquoi mais un 1 est venu s'incruster dans ce bout de code
Private Sub UserForm1_Activate() que fait ce 1 mystère
Maintenant cela refonctionne
Cordialement
Commenter la réponse de JCB40