position absolue d'un objet en VBA, CorelDraw

[Anselm]

Bonjour,

Je sais que je ne travaille pas sur une application office, mais le problème que je rencontre est un problème de programmation en VBA, est la solution est donc à priori similaire à celle des logiciels de la suite office. J'avais essayé de poser ma question sur un forum généraliste mais n'ai pas obtenu de répone, c'est pourquoi je me tourne vers vous. J'espère donc que certains d'entre vous pourront m'aider.

Voici donc le problème :

Je souhaiterai déplacer une sélection (sélection d'un ou plusieurs objets) par rapport aux coordonnées absolues du documents. Sur Corel, il existe en effet un repère O,x,y, mais je n'arrive pas 'a l'utiliser dans les macro.

Je sais seulement déplacer un objet par rapport à lui-même, donc en utilisant les coordonnées relatives, de la manière suivante :

ActiveSelection.Move 53, -40

Cela ne m'intéresse pas, je souhaiterai par exemple déplacer l'objet aux coordonnées X=5 et Y=10 du document.

Avez vous des idées ?

Merci beaucoup de votre aide,

Cordialement,

anselm

 

[Dranreb]

Re : position absolue d'un objet en VBA, CorelDraw

Bonjour.
J'ai toujours vu partout que les objets positionnés dans un truc ont des propriétés Top et Left. Voir si ce n'est pas le cas ici aussi.

 

[gosselien]

Re : position absolue d'un objet en VBA, CorelDraw

Bonjour,
ça ne serait pas :
with selection
shaperange.incrementleft et
shaperange.increment top
end with