VBA ACCESS redimensionner graphe dans formulaire

2012年7月21日 12:54

0
Bonjour,

J'ai un graphique dans un formulaire que je voudrais redimensionner quand je change la taille du formulaire.

Le code suivant est inopérant ...
```
Private Sub Form_Resize()
    Me.Graphique.Width = Me.Width - Me.Graphique.Left
    Me.Graphique.Height = Me.Section(acDetail).Height - Me.Graphique.Top
    Me.Repaint
End Sub
```
Quelqu'un a une idée ?
- 移動 ArgyronetMVP, Moderator 2012年9月21日 7:26 95bf9f38-f413-490d-bea7-906c65555bb8 (Origine :Développement VBA)
- 返信
- 引用

すべての返信

2012年7月27日 12:31

1
Salut Blaise !

Il faut intervenir sur les dimensions du graphe lui-même, notamment le PlotArea.
```
vChart.PlotArea.Width
```
Tu as 2 tutos sur ma page perso qui devrais te familiarisé avec l'objet Graph (si tu ne l'es pas).

Attention avec W7 il semble qu'il y ai quelque problèmes avec le redimensionnement.

Cordialement,

Visitez mes sites : http://2gm.free.fr | http://loufab.developpez.com
- 編集済み loufabMVP 2012年8月1日 14:52
- 回答としてマーク Aurel BeraMicrosoft Contingent Staff, Owner 2012年10月2日 14:22
- 回答としてマークされていない blaise032 2012年10月3日 8:09
- 返信
- 引用

2012年10月3日 8:12

Private Sub Form_Resize()
    On Error Resume Next 'au cas où le formulaire est trop petit
    Me.Graphique.Width = Me.InsideWidth - Me.Graphique.Left - 10
    Me.Graphique.Height = Me.InsideHeight - Graphique.Top - 10
    Me.Recalc
End Sub

回答としてマーク blaise032 2012年10月3日 8:12