DÉPLACEMENT D'UN OBJET SHAPE DANS FEUILLE EXCEL

Signaler
Messages postés
5
Date d'inscription
jeudi 21 février 2008
Statut
Membre
Dernière intervention
30 mars 2010
-
Messages postés
301
Date d'inscription
lundi 27 février 2006
Statut
Membre
Dernière intervention
17 décembre 2017
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/51513-deplacement-d-un-objet-shape-dans-feuille-excel

Messages postés
301
Date d'inscription
lundi 27 février 2006
Statut
Membre
Dernière intervention
17 décembre 2017

Salut COYOTE26,

Je pense que j'ai résolu ton pb et je vais déposer sur le site VB France un code qui devrait te convenir. Il s'appellera "Manipulations Formes sur Graphes Excel avec VBA".
Merci de me donner ton avis.

Cdt
Messages postés
4
Date d'inscription
mardi 19 août 2003
Statut
Membre
Dernière intervention
22 juillet 2011

Salut MIMIZANZAN,

Je te remercie de ta réponse, même si j'espérais pouvoir l'adapter à mon cas.

En fait je veut positionner un rectangle là ou je clique sur le graphique.

Pour cela, j'utilise les évènements mousedown et je récupere les coordonnées X et Y
Actuellement, je fais une transformation des coordonnée écran en coordonnée de mon chartarea avec des valeurs fixes qui correspondent à mon PC et mon niveau de Zoom dans excel.
Mais j'aimerais que mon code fonctionne sur n'importe quel PC ou n'importe quel niveau de zoom.

Il faudrais pour celà que j'arrive à créer une correspondance entre le X Y de la souris et le TOP,LEFT,WIDTH,HEIGHT de Chartarea
Pour déterminer le 0,0 de ChartArea et le coefficent entre les pixel et les point écran(qui semble être 4/3, quelque soit les PC)

Cordialement,
Messages postés
301
Date d'inscription
lundi 27 février 2006
Statut
Membre
Dernière intervention
17 décembre 2017

Salut COYOTE26,
En effet, le code est écrit pour des feuilles de calcul Excel.
Pour les feuilles graphiques, j'ai réfléchi, mais je ne vois pas comment t'aider.
Désolé, peut-être que qq aura une idée, mais je ne vois pas l'intérêt de ce que tu veux faire avec les shapes sur une feuille graphique...

Cdt
Messages postés
4
Date d'inscription
mardi 19 août 2003
Statut
Membre
Dernière intervention
22 juillet 2011

Salut,

bravo pour ton code, je suis moi même intéressé mais sur un onglet activechart or toutes tes références sont en activesheet.
Car j'ai le même problème de transformation coordonnée fenêtre et coordonné souris, je ne vois pas comment modifier pour l'adapter

J'aimerais en fait commencer à tracer une shape à l'endroit ou j'ai cliqué

Cordialement,
Afficher les 18 commentaires