Bug avec userform

[Christian3000]

Bonjour à tous,

J'ai réalisé une userform qui collecte plusieurs informations et j'aimerais que ces informations s'affichent sur la feuille excel désignée. Le code me semble bon mais j'ai le message d'erreur suivant:"Variable objet ou variable de bloc With non définie".
Franchement, j'ai besoin de votre aide parce que je n'arrive pas à comprendre là où ça croche...
Je vous joins le fichier en question.

Merci d'avance pour votre aide!

A+

Christian

 

[Efgé]

Re : Bug avec userform

Bonjour

Essayer de remplacer la définition de numlignevide :

Dim numlignevide As [COLOR=red][B]Long[/B][/COLOR]

et

numlignevide = Worksheets("Liste").Range("J" & Application.Rows.Count).End(xlUp).Row + 1

Cordialement

 

[Christian3000]

Re : Bug avec userform

Merci Efge!

En fait, je viens de réaliser que mon code marche lorsque la première ligne de la feuille où doivent s'inscrire les infos ("Liste") est remplie... Ainsi, il m'a suffit de noter les en-têtes de colonnes pour que ça marche. Bizarre non??

A+

Christian