seniorpapou a écrit :
Bonjour, comment va?
je suppose que ta ligne myAr(i) = "Text Box " & i est écrite dans ton code comme ceci: myAr(i) = "TextBox" & i
Comment as-tu incorporé l'image?
J'ai fait l'essai avec un coller d'un print screen, et je n'ai pas de pb
Cordialement
|
Salut Senior
Ça faisait un sacré moment.Ça roule pour moi.Tu vas bien?
J'appuie sur la touche Impr écran et je colle sur excel.
Ensuite, comme je le disais, si je dessine mes zones de texte sur ce que je viens de coller et que je lance la macro, elle me retourne le message d'erreur cité plus haut.Par contre, si je dessine mes zonnes de texte en dehors et que je les déplace sur mon collage, la macro fonctionne tout à fait correctement.L'instruction dont tu parles s'écrit bien de la façon indiquée (je n'ai fait qu'un copier/coller).Ou alors, comme je l'ai indiqué, le code peut s'écrire:
Dim myAr(1 To 4)
'La 1ère instruction étant inutile (en tout cas selon moi), j'écris Dim et non Redim
'Dans tous les cas, en conservant la macro telle qu'elle figure sur le site, je vois ce fameux message d'erreur
For i = 1 To 4
myAr(i) = "Text Box " & i
Next