macro dans usf

[civodul]

Bonjour ,

j'ai créer un userform avec une listbox renseigner par une feuille (jusque la pas de problème).

Dans le usf je fais:

Private Sub ListBox1_Change()
Numeroarticle
End Sub

et là erreur 1004 alors que la macro 'numeroarticle' fonctionne correctement si je l'execute seule.

Début de la macro numeroarticle:

Application.ScreenUpdating = False
Sheets("Listes").Select
Range("G2").Select
Selection.ClearContents (plantage ici)

num = Range("c2").Text

etc....

merci

 

[Pierrot93]

Re : macro dans usf

Bonjour Civodul,

pas tout compris, mais pas le code complet non plus... A tout hasard, remplaces peut être tes 3 lignes par ceci :

Sheets("Listes").Range("G2").ClearContents

bonne journée
@+

 

[civodul]

Re : macro dans usf

Bonjour Pierrot

j'ai essayé mais ce n'est pas ça.

Merci

 

[Pierrot93]

Re : macro dans usf

Re

mets peut être un petit fichier, sans données confidentielles, mais avec le code complet, car là en l'état pas facile de t'aider...

@+