Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

VBA "La méthode HasAxis de l'objet _Chart a échoué

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion ste1000
  • Date de début Date de début

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 !

S'inscrire
S

ste1000

Guest
Bonjour à tous,

je bute sur un problème que j'ai retrouvé plusieurs fois sur des forums (dont celui-ci) sans réponse malheureusement.

Je dispose d'un tableur (non joignable pour cause confidentialité) qui contient de nombreux graphiques différents (dont par exemple des camemberts, histogrammes...). J'aimerais faire une macro qui mette en forme les axes abscisses et ordonnée lorsque ceux-ci existent.

J'utilise un code de la forme
With ActiveChart.Axes(xlValue)
... (mise en forme)
End With
Cliquez pour agrandir...

Pour les histogrammes ça marche nickel mais pour les camemberts ça plante, évidemment car il n'est pas possible de définir un axe pour ce type de graphe. J'aimerais donc mettre un test du type :
If ActiveChart.HasAxis(xlValue, xlPrimary) Then
With ActiveChart.Axes(xlValue)
... (mise en forme)
End With
End If
Cliquez pour agrandir...

Sauf que dans le cas de mon camembert j'obtiens le message "La méthode HasAxis de l'objet _Chart a échoué"

Quelqu'un aurait-il une idée ? Pour info j'utilise Excel 2002 sur PC.

Merci d'avance,

Stéphane
 
Trier par date Trier par votes
Re : VBA "La méthode HasAxis de l'objet _Chart a échoué

Bonjour Ste1000,
peut être en gérant l'erreur, comme ceci
A voir
Bruno

Code: 
On Error Resume Next
With ActiveChart.Axes(xlValue)
if Err<>0 then Err.Clear:Goto camembert
... (mise en forme)
End With
Exit sub
camembert:
'la macro qui fonctionne pour sans Axe
End Sub
 
Vote positif 0 Vote négatif
Re : VBA "La méthode HasAxis de l'objet _Chart a échoué

Bonjour à vous,

L'idée de Youki(BJ) est parfaite.

Sinon tu peux également utilise la méthode : ChartType

Code: 
' Vérifier si le type de graphique contient "pie" = secteur
If InStr(1, ActiveChart.ChartType, "pie", vbTextCompare) = 0 Then
With ActiveChart.Axes(xlValue)
... (mise en forme)
End With
EndIf

A+
 
Vote positif 0 Vote négatif
Re : VBA "La méthode HasAxis de l'objet _Chart a échoué

Bonjour,

merci beaucoup pour vos réponses !

La méthode ChartType est parfaite si je n'ai que 2 types de graphiques (camembert et histogramme), mais j'aimerais que ça fonctionne pour d'autres graphiques aussi, donc je vais m'en tenir à la méthode de Youki(BJ).

J'essaie comme ça et vous dirai si par hasard je trouve mieux dans l'intervalle.

Stéphane
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

B
  • Question Question
Microsoft 365 RESOLU Message d'erreur "La méthode 'range' de l'objet '_global ' a échoué "
2
Réponses
16
Affichages
676
job75
M
  • Question Question
XL 2019 La méthode select de la classe range a échoué
Réponses
4
Affichages
322
job75
C
  • Résolu(e)
XL 2016 erreur 1004 _ la méthode range de l'objet global a échoué
Réponses
5
Affichages
876
ced91300
C
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
1 K
spike29
S
R
  • Question Question
XL 2021 Erreur d'exécution '-2147417848 (80010108). La méthode '-Default' de l'objet 'Range' a échoué après quelques saisies d'enregistrement
2
Réponses
23
Affichages
3 K
Rv_38
R
L
  • Question Question
XL 2019 Erreur 1004 méthode 'SaveAs' de l'objet '_Workbook' a échoué
Réponses
13
Affichages
2 K
Dranreb
Y
  • Question Question
XL 2013 la méthode value de l'objet range a échoué!!
Réponses
7
Affichages
1 K
Hasco
V
  • Résolu(e)
XL 2016 la méthode range de l'objet _global a échoué
Réponses
9
Affichages
2 K
soan
S
E
  • Question Question
XL 2016 La méthode range de l'objet worksheet a échoué For Each ligne In Range("checker")
Réponses
2
Affichages
3 K
Edouarda65
E
L
  • Question Question
Microsoft 365 La méthode Delete de la classe range a échoué (Déboguer VBA)
Réponses
6
Affichages
2 K
lukes67
L
E
  • Question Question
XL 2016 La méthode 'paste' de l'objet 'worksheet' a échoué
2
Réponses
26
Affichages
3 K
patricktoulon
L
  • Résolu(e)
XL 2019 Liaison de données Word Excel et "méthode range de l'objet global a échoué"
Réponses
12
Affichages
4 K
Staple1600
P
  • Question Question
La méthode value de l'objet range a échoué
Réponses
9
Affichages
4 K
job75
A
  • Question Question
XL 2016 La méthode "Value" de l'objet Range a échoué - Userform
Réponses
6
Affichages
2 K
jmfmarques
J
L
  • Question Question
Word Liaison de données Word Excel et "méthode range de l'objet global a échoué"
Réponses
6
Affichages
2 K
Lapinturbo
L
S
  • Question Question
Microsoft 365 La méthode 'Add' de l'objet 'ListRows' a échoué
2
Réponses
24
Affichages
4 K
SCorbeil
S
F
  • Résolu(e)
Microsoft 365 VBA erreur d'exécution 1004 : méthode range de l'objet _global
2
Réponses
17
Affichages
3 K
Dranreb
S
  • Résolu(e)
XL 2013 Méthode de sélection alternative
Réponses
4
Affichages
2 K
stage_ferrit
S
T
  • Question Question
Symptôme de l'erreur - "La méthode 'add' de l'objet 'ListRows' à échoué"
Réponses
3
Affichages
2 K
taratata
T
  • Question Question
la méthode rows de l'objet _global a échoué
Réponses
6
Affichages
3 K
anass1
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…