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

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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

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:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Retour