XL 2013 Intervertir Ligne et colonne sur Graphique en VBA

pmfontaine

XLDnaute Occasionnel
Bonjour,
Sur le fichier joint le graphique de la feuille "GRAPHIQUEOBTENU" à une zone variable en ligne et colonne, je mets donc à jour la source du graphique avec la macro
Code:
Sub zone()
    ActiveSheet.ChartObjects("Graphique 1").Activate
    ActiveChart.SetSourceData Source:=Range("GLOBAL")
End Sub
Jusque la pas de problème, mais par défaut il me remet a chaque fois les sites en abscisse alors que je voudrais les dates comme sur la feuille "GRAPHIQUESOUHAITE"
J'ai essayer d'enregistrer la macro pour intervertir les axes, mais ça ne marche pas et mes recherches sur le Net non pas abouties.
Est-ce que vous auriez une solution ?
Merci d'avance pour votre aide
Patrick
 

Fichiers joints

Discussions similaires


Haut Bas