Discussion :

[hugonoof]

Bonjour,
J'aimerais tracer une ligne entre deux clic de souris.
J'ai essayé en recupérant les coordonnées du curseur a l'aide de getCursorPos, et ensuite de faire un Shapes.AddLine(x, y, xx, yy), mais voila mon trait ne se place jamais exactement ou j'ai cliqué, j'ai toujours des décalage (aprés recherche sur le forum il semblerait que ce soit du a un probleme de conversion entre pixel et point ...) , bref je galere et je trouve pas la solution.

Merci d'avance.

[fring]

Bonjour,

Ce que tu cherches à faire ne me semble pas vraiment réalisable parce que les coordonnées x et y de la position du curseur sont par rapport au coin supérieur gauche de l'écran et que les coordonnées des points de la ligne sont par rapport au coin supérieur gauche de la feuille.

Voilà pourquoi le décalage.

Eventuellement, tu places le curseur dans le coin supérieur gauche de ta feuille, tu prends note des coordonnées (exemple x = 30 et y = 130).

Ensuite, je ne sais pas comment est fait ton code, lorsque tu définis les points de ta ligne tu fais

Code :

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

ActiveSheet.Shapes.AddLine(x - 30, y - 130, xx - 30, yy - 130).Line.DashStyle = msoLineSingle

Mais ça ne sera pas de la haute précision...

@+

[ucfoutu]

Bonjour,

A utiliser donc en conjonction avec la fonction "ClientToScreen" de la librairie user32 de l'API de Windows.

A étudier...

[fring]

Bon...j'ai essayé, comme dans mon exemple x-30 et y-130 mais ça foire, j'ai oublié un petit détail...la position de la souris est en pixel et la position de la ligne en point

J'ai une petite question toute bête...pourquoi ne pas prendre une ligne et la tracer ?

Bonjour,

A utiliser donc en conjonction avec la fonction "ClientToScreen" de la librairie user32 de l'API de Windows.

A étudier...

Bien vu je ne connaissais pas

[hugonoof]

Ok je comprends mieux, l'histoire du bord de la feuille et du bord de l'ecran, mais effectivement il n'y a pas que ça car le décalage n'est pas toujours egal, donc il doit y avoir un egalement un coefficient ...

J'ai une petite question toute bête...pourquoi ne pas prendre une ligne et la tracer ?

Mes lignes ne sont pas forcement parralelle ou perpendiculaire.

Je vais me renseigner du coté de "ClientToScreen", merci de vos repnse et si vous trouvez avant moi n'hesitez pas

[fring]

Mes lignes ne sont pas forcement parralelle ou perpendiculaire.

Je ne vois pas le rapport