Positionnement d'image différent en fonction de l'ordinateur utilisé

[HolyGrail]

Bonjour à tous,

Je suis chargé de créer un fichier contenant des images qui se mettent en place automatiquement sur la feuille, en fonction de la situation. Pour placer ces images, j'utilise le code suivant :

Worksheets("Feuil1").Shapes("Picture 2").Select
        Selection.ShapeRange.Left = 70
        Selection.ShapeRange.top = 70

Sur mon pc, toutes les images se placent comme je le souhaite. Cependant, lorsque je teste le fichier sur un autre pc, les images sont légèrement décalées vers le haut et sur la gauche.

J'ai beau chercher, je ne trouve pas comment résoudre ce problème. Est-ce que c'est un problème de résolution d'écran ? (les deux écrans n'ont pas la même résolution). Ou un problème au niveau des réglages dans excel ?

Quelqu'un a-t'il déjà rencontré un cas similaire ?

Merci d'avance.

 

[Modeste geedee]

Re : Positionnement d'image différent en fonction de l'ordinateur utilisé

Bonsour®

les images sont légèrement décalées vers le haut et sur la gauche.

par rapport à quoi ???
si c'est par rapport aux dimensions de l'écran c'est normal il faut appliquer un coefficient de correction
- coefficient à définir par essais successifs

si c'est par rapport au quadrillage (Cellule) , il faut alors positionner les images relativement aux positions ces cellules
Worksheets("Feuil1").Shapes("Picture 2").Select
Selection.ShapeRange.Left = CelluleRef.Left
Selection.ShapeRange.top = CelluleRef.Top