Discussion :

[RoZyk]

Bonjour tout le monde,

Après plusieurs recherches sur le net sans succès, je m'en remet à l'immense savoir de la communauté développez.com

J'ai un graphique dans un formulaire, et j'aimerai savoir si il est possible de zoomer sur une zone de mon graphique.

Si vous avez besoin de plus de précision, je reste à disposition.

Merci pour vos futurs suggestions!!

[loufab]

Bonjour,

A ma connaissance le modèle Graph ne permet pas le zoom. Tu peux utiliser la loupe disponible dans le système d'exploitation ou mettre ton graphique dans un état et bénéficier du zoom de l'état en mode aperçu.

Cordialement,

[RoZyk]

Arf, ça m'arrange pas trop...

Merci quand même!!

[micniv]

Bonjour,
A toi de voir si cela peut te suffire, mais j'utilise ce simple code pour zoomer/dézoomer un chart avec un coefficient k

Code :

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

1
2
3
4
5
6
Set cht = c.Object.Application.Chart
              cht.Top = cht.Top * k
            cht.Left = cht.Left * k
            cht.Width = cht.Width * k
            cht.Height = cht.Height * k
            Set cht = Nothing

c est le contrôle du formulaire qui contient le chart

[RoZyk]

Pardon pour ma réponse tardive, j'étais passé sur autre chose, je vais tester ta proposition dès cet après-midi.

Merci beaucoup

[RoZyk]

Je m'excuse de mon ignorance, mais je ne vois pas comment utiliser le bout de code que tu m'as donné?

Peux tu détailler un peu plus? Et peut être un petit exemple, sans vouloir abuser??

[micniv]

Voici un exemple zippé (une vielle contribution) dans lequel j'ai ajouté un bouton Zoom / Dézoom
N'hésite pas si tu as besoin d'explication

[RoZyk]

Merci beaucoup!

Ça marche bien en tout cas, je vais essayer de perfectionner un peu la fonctionnalité Zoom, par exemple en appuyant plusieurs fois sur zoom, on zoom de plus en plus...

Mais sinon, je pense que ça va le faire!!

Merci encore

[loufab]

Simple mais il fallait y penser ! Bravo Micniv. A mettre dans la FAQ.

[micniv]

Merci d'apprècier

A mettre dans la FAQ.

Mais quelle est la procédure ?
A+

[rch05]

Bonjour à tous,

J'ai lu avec attention votre discussion, et celle-ci m'a beaucoup intéressée.
Je vais surement l'appliquer dans mon programme.

Merci micniv

Bonne journée

Christian