Bonsoir,
pour contourner le problème, Reprenez vos code et dimensionnez vos variables.
En début de chaque Sub ajoutez une ligne avec par exemple pour PosY:
Dim PosY
si vous connaissez son type vous pouvez le spécifier mais ce n'est pas obligatoire, utile mais pas obligatoire, ici PosY correspond à un numéro de ligne de la feuille Excel, donc un typage "Long" peut être nécessaire si la variable doit dépasser les 32768 lignes !:
Dim PosY As Long
il y en a d'autre des variables : PosX, MaxY, I etc...Bon courage à vous !
@ bientôt
LouReeD