OVH Cloud OVH Cloud

dimensionner précisément un graph

3 réponses
Avatar
laurent
Bonjour,
Je souhaiterais dimensionner pr=E9cis=E9ment en pixel un=20
graph. Cela est 'il possible, car pour l'instant je ne le=20
dimensionne que =E0 l'aide de la souris.
Si vous pouvez m'apporter des informations, maerci=20
beaucoup.
Bonne journ=E9e.

3 réponses

Avatar
twinley
Bonjour,

Exemple donné de ce forum :
pour utiliser l'espace maximum (b):sinon à toi de déterminer les dimensions
voulues (c) Sub ViewGraphmax() ActiveSheet.ChartObjects(1).Activate
ActiveChart.ShowWindow = True ActiveWindow.Height Application.UsableHeight '----(c)--ActiveWindow.Height = 200
'----(a)--ici hauteur =largeur ActiveWindow.Width Application.UsableHeight '-----sinon largeur max
'----(b)-ActiveWindow.Width = Application.UsableWidth
'----(c)--ActiveWindow.width = 200 ActiveWindow.Top = 0
ActiveWindow.Left = 0End Sub
--
à+twinley
"laurent" a écrit dans le message de
news:735001c494c0$d0e77d40$
Bonjour,
Je souhaiterais dimensionner précisément en pixel un
graph. Cela est 'il possible, car pour l'instant je ne le
dimensionne que à l'aide de la souris.
Si vous pouvez m'apporter des informations, maerci
beaucoup.
Bonne journée.
Avatar
twinley
mes excuses, j'ai fait un copié collé et c'est illisible.

pour utiliser l'espace maximum (b):
sinon à toi de déterminer les dimensions voulues (c)

Sub ViewGraphmax()
ActiveSheet.ChartObjects(1).Activate
ActiveChart.ShowWindow = True
ActiveWindow.Height = Application.UsableHeight
'----(c)--ActiveWindow.Height = 200
'----(a)--ici hauteur =largeur
ActiveWindow.Width = Application.UsableHeight
'-----sinon largeur max
'----(b)-ActiveWindow.Width = Application.UsableWidth
'----(c)--ActiveWindow.width = 200
ActiveWindow.Top = 0
ActiveWindow.Left = 0
End Sub

J'espère que c'est mieux
à+twinley
"laurent" a écrit dans le message de
news:735001c494c0$d0e77d40$
Bonjour,
Je souhaiterais dimensionner précisément en pixel un
graph. Cela est 'il possible, car pour l'instant je ne le
dimensionne que à l'aide de la souris.
Si vous pouvez m'apporter des informations, maerci
beaucoup.
Bonne journée.
Avatar
laurent
Merci pour les infos. bonne journée

-----Message d'origine-----
mes excuses, j'ai fait un copié collé et c'est illisible.

pour utiliser l'espace maximum (b):
sinon à toi de déterminer les dimensions voulues (c)

Sub ViewGraphmax()
ActiveSheet.ChartObjects(1).Activate
ActiveChart.ShowWindow = True
ActiveWindow.Height = Application.UsableHeight
'----(c)--ActiveWindow.Height = 200
'----(a)--ici hauteur =largeur
ActiveWindow.Width = Application.UsableHeight
'-----sinon largeur max
'----(b)-ActiveWindow.Width = Application.UsableWidth
'----(c)--ActiveWindow.width = 200
ActiveWindow.Top = 0
ActiveWindow.Left = 0
End Sub

J'espère que c'est mieux
à+twinley
"laurent" a écrit
dans le message de

news:735001c494c0$d0e77d40$
Bonjour,
Je souhaiterais dimensionner précisément en pixel un
graph. Cela est 'il possible, car pour l'instant je ne le
dimensionne que à l'aide de la souris.
Si vous pouvez m'apporter des informations, maerci
beaucoup.
Bonne journée.


.