Excel VBA - Macro pour graduer automatiquement les axes d’un climatogramme.

Nicolas Lepauvre

XLDnaute Junior
Bonjour à tous
Je débute en VBA et fais face au problème suivant.
J’essaie d‘automatiser un climatogramme. Et cette automatisation est à moitié réussie car elle s’effectue sans graduation automatique de ses axes.
Pour automatiser la graduation des axes, j’ai écrit le code ci-dessous. Et il ne fonctionne pas.
Quelqu’un pourrait-il m’aider à y voir plus clair?
En avance recevez mes remerciements

Private Sub ComboBox3_Click()
'Axe des précipitations
ActiveChart.Axes(xlValue).Select
ActiveChart.Axes(xlValue).MinimumScale = Feuil3.[W4]
ActiveChart.Axes(xlValue).MaximumScale = Feuil3.[Y4]
ActiveChart.Axes(xlValue).MajorUnit = Feuil3.[AA4]
Application.CommandBars("Format Object").Visible = False
'Axe des températures
ActiveChart.Axes(xlValue, xlSecondary).Select
ActiveChart.Axes(xlValue, xlSecondary).MinimumScale = Feuil3.[W5]
ActiveChart.Axes(xlValue, xlSecondary).MaximumScale = Feuil3.[Y5]
ActiveChart.Axes(xlValue, xlSecondary).MajorUnit = Feuil3.[AA5]
Application.CommandBars("Format Object").Visible = False
End Sub
 

Pièces jointes

  • Climatogramme.xlsm
    42.3 KB · Affichages: 36

Bebere

XLDnaute Barbatruc
bonjour
Nicolas changé code combobox3 et dans combobox1 ajouter un clear pour 2 et 3
parfois erreur parfois pas, ajout on error resume next
pour les 2 lignes en commentaires il me semble que c'est une syntaxe d'excel2013
 

Pièces jointes

  • Climatogramme.xlsm
    43.5 KB · Affichages: 26

Nicolas Lepauvre

XLDnaute Junior
bonjour
Nicolas changé code combobox3 et dans combobox1 ajouter un clear pour 2 et 3
parfois erreur parfois pas, ajout on error resume next
pour les 2 lignes en commentaires il me semble que c'est une syntaxe d'excel2013
Bonjour Bebere et bonjour le forum,
Merci pour votre réponse.
Mais cependant la graduation n'est pas toujours automatique.
Le maximun, le minimun et l'intervalle des l'axe des précipitations se trouvent sur la feuille <<Choix et tableau>> dans les cellule [W4], [Y4] et [AA4]
Le maximun, le minimun et l'intervalle des l'axe des températures se trouvent sur la feuille <<Choix et tableau>> dans les cellule [W5], [Y5] et [AA5].
Prière de bien vouloir continuer à m'aider.
En attaché des exemples de graduations faites manuellement.
Merci.
Clima_Kazan.png
Clima_Nice.png
 
Dernière édition:

Statistiques des forums

Discussions
312 196
Messages
2 086 098
Membres
103 116
dernier inscrit
kutobi87