jacky49
XLDnaute Impliqué
Bonjour le forum,
j'ai modifié quelques colonnes dans mon tableau et supprimer des données dans mon USF et maintenant, j'ai une erreur dans mon code que voici
il me surligne en jaune la ligne que j'ai mise en rouge
je vous joint le fichier
merci
jacky
j'ai modifié quelques colonnes dans mon tableau et supprimer des données dans mon USF et maintenant, j'ai une erreur dans mon code que voici
Code:
Sub EcritUSF(Arg1)
Sheets("LISTE CLIENT").Select
Mesval = Array("T1", "T2", "T3", "T4", "T5", "T6", "T7", "TB1", "T8", "T9", "T10", "TB2", "T11", "T12", "T13")
For i = 0 To UBound(Mesval)
[COLOR="red"]Sheets("LISTE CLIENT").Cells(Arg1, i + 2) = ufnewcl.Controls(Mesval(i)).Text
Next[/COLOR]
Unload ufnewcl
Sheets("SAISIE CLIENT").Select
End Sub
je vous joint le fichier
merci
jacky
Pièces jointes
Dernière édition: