hemardjean
XLDnaute Occasionnel
Bonsoir le forum
J’ai voulu transformer deux dossiers que j’ai copié sur le forum mais lorsque je le lance il bloque.
Le premier changement se trouve dans ;
Private Sub UserForm_Initialize()
Au niveau du nom du fichier ;
fichier = "LISTE_FOURNISSEURS_LAUVIZH.xls"
le deuxième ;
Private Sub ComboBox2_Change()
Au niveau ;
ActiveCell.Offset() = Me.ComboBox2
ActiveCell.Offset() = Me.ComboBox1.Column()
J’ai retiré les chiffres des parenthèses pour n’afficher dans ma feuille que le code produit
L’ erreur se trouve à l’ ouverture de l’userform:
UserForm1.Left = 100 + Target.Left
Après plusieurs assais infructueux je me tourne vers vous
je vous joins le fichier pour plus de compréhension
Cordialement
A+ hemardjean
J’ai voulu transformer deux dossiers que j’ai copié sur le forum mais lorsque je le lance il bloque.
Le premier changement se trouve dans ;
Private Sub UserForm_Initialize()
Au niveau du nom du fichier ;
fichier = "LISTE_FOURNISSEURS_LAUVIZH.xls"
le deuxième ;
Private Sub ComboBox2_Change()
Au niveau ;
ActiveCell.Offset() = Me.ComboBox2
ActiveCell.Offset() = Me.ComboBox1.Column()
J’ai retiré les chiffres des parenthèses pour n’afficher dans ma feuille que le code produit
L’ erreur se trouve à l’ ouverture de l’userform:
UserForm1.Left = 100 + Target.Left
Après plusieurs assais infructueux je me tourne vers vous
je vous joins le fichier pour plus de compréhension
Cordialement
A+ hemardjean