erreur execution 9

[adkheir]

bonjour le forum
je suis souvent confronté a cette erreur "9" quelqu'un pourrait il m'éclaircir voici le code
Sub Test()
If ActiveCell <> "" And ActiveCell.Row > 2 Then
Mesval = Array("TextNom", "TextPrenom", "textGrade", "TextCCP", "TextCLE", "TextNbre")
MaLig = ActiveCell.Row
For i = 0 To UBound(Mesval)
ufnewcl.Controls(Mesval(i)).Text = Sheets("Liste").Cells(MaLig, i + 2)
Next
ufnewcl.CommandButton1.Visible = True
ufnewcl.Valid.Visible = False
ufnewcl.Show
Else
MsgBox "Selectionner une fiche !"
End If
End Sub
Sub EcritUSF(Arg1)
Mesval = Array("TextNom", "TextPrenom", "textgrade", "TextCCP", "TextCLE", "TextNbre")
For i = 0 To UBound(Mesval)
Sheets("Liste").Cells(Arg1, i + 2) = ufnewcl.Controls(Mesval(i)).Text
Next
Unload ufnewcl
End Sub
,
l'erreur est la d'après le débogage " gufnewcl.Controls(Mesval(i)).Text = Sheets("Liste").Cells(MaLig, i + 2) "

 

[Paritec]

Re : erreur execution 9

Bonsoir adkheir, le forum,
tu dis l'erreur a lieu là
gufnewcl.Controls(Mesval(i)).Text = Sheets("Liste").Cells(MaLig, i + 2) "

Si tu n'a pas d'user nommé Gufnexcl c'est normal, retires le g et cela devrait marcher
a+
¨Papou

 

[adkheir]

Re : erreur execution 9

Bonsoir adkheir, le forum,
tu dis l'erreur a lieu là
gufnewcl.Controls(Mesval(i)).Text = Sheets("Liste").Cells(MaLig, i + 2) "

Si tu n'a pas d'user nommé Gufnexcl c'est normal, retires le g et cela devrait marcher
a+
¨Papou

Merci pour ta réponse Paritec mais rien de changé toujours la même chose alors que cette ligne est colorée en jaune c'est pour cela que je t'es dis que l'erreur est la .

 

[Cousinhub]

Re : erreur execution 9

Bonsoir,

j'ai donc créé un fichier, et un userform, avec 6 Textbox, tous nommés comme tu l'as mis dans le code (PS, tu aurais pu le faire, c'est toi qui demande de l'aide...... 😡)

Et la seule raison que je vois, c'est que ta feuille ne s'appelle pas "Liste", mais peut-être "Liste " (avec un espace derrière), ou toute autre faute d'orthographe....

 

[adkheir]

Re : erreur execution 9

bonsoir
oui effectivement ma feuille s'appelle " liste_exmen_ITE " oh quel nul que je suis merci de ton aide BHbh vraiment génial