Discussion :

[david-lt]

Bonjour,
je travaille actuellement sur une macro VBA réalisée par mon prédécesseur. L'objectif de la macro est de pouvoir suivre les expéditions de l'entreprise.
Une MàJ doit être faite à chaque utilisation.

Lors de la mise à jour du fichier une erreur apparait. Lorsque la feuille excel atteint la 286ème ligne, l'erreur me dit : "vous ne pouvez pas déplacer des objets en-dehors de la feuille".

J'essaierai bien de vous mettre un extrait de code VBA mais comme je ne sais pas d'où cela vient, je ne peux pas vous aider plus que ça.

Avez-vous une idée d'où peut provenir l'erreur potentiellement ?

[Patrice740]

Bonjour,

Le message d'erreur propose-t-il un débogage ? Sur quelle instruction ?

Sans le code, on ne peut qu’émettre des hypothèses.

Probablement un 'copy destination' ou un 'paste'
Ne peut-il pas être remplacé par une affectation des valeurs ?

[david-lt]

Oui le message d'erreur propose un déboggage sur la ligne n°2:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If .Range("AA" & i).Value <> "" Then .Range("A" & i & ":AC" & i).Interior.ColorIndex = 36
.Range("E" & i).EntireRow.Insert Shift:=xlDown
End If

Cependant la ligne se trouve dans une boucle et celle-ci a le temps de tourner plusieurs fois avant de générer une erreur.

[Patrice740]

Re,

Le problème vient d'un objet (un shape) situé sur la feuille, qui petit à petit est poussé vers le bas de la feuille.
Soit cet objet est un résidu inutile et il faut le supprimer, sinon il faut le repositionner à chaque insertion.
Edit : ou le rendre indépendant des insertions

[david-lt]

Merci Patrice740,
c'était bien un résidu inutile caché au milieu de lignes vides (je n'y aurais jamais pensé).
J'ai nettoyé l'ensemble des lignes blanches et le problème a disparu.