Macro excel inversion axe ordonnée
Fermé
frippons
Messages postés
550
Date d'inscription
jeudi 7 juin 2007
Statut
Membre
Dernière intervention
18 octobre 2015
-
29 mars 2008 à 12:34
michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 29 mars 2008 à 18:22
michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 29 mars 2008 à 18:22
Bonjour à tous,
1) Je cherche la commande qui me permet d'inverser l'axes des ordonnées quand je fais une macro sous excel.
2) Je voudrai savoir également comment fixe la limite maximum de l'axe des abscisse et des ordonnées toujours sous une macro excel.
Merci d'avance
1) Je cherche la commande qui me permet d'inverser l'axes des ordonnées quand je fais une macro sous excel.
2) Je voudrai savoir également comment fixe la limite maximum de l'axe des abscisse et des ordonnées toujours sous une macro excel.
Merci d'avance
A voir également:
- Macro excel inversion axe ordonnée
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si et excel - Guide
- Déplacer une colonne excel - Guide
1 réponse
michel_m
Messages postés
16602
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 313
29 mars 2008 à 18:22
29 mars 2008 à 18:22
Bonjour,
exemple sur un graphique en nuage de points situé en feuil1 données en A1:G11
le graphique est sélectionné au préalable
With ActiveChart
'permutation des axes: xlrows ou xlcolumns suivant le cas
.SetSourceData Source:=Sheets("Feuil1").Range("A1:G11"), PlotBy:=xlRows
'choix d'une échelle maximum: par ex. 25
.Axes(xlValue).MaximumScale = 25
End With
exemple sur un graphique en nuage de points situé en feuil1 données en A1:G11
le graphique est sélectionné au préalable
With ActiveChart
'permutation des axes: xlrows ou xlcolumns suivant le cas
.SetSourceData Source:=Sheets("Feuil1").Range("A1:G11"), PlotBy:=xlRows
'choix d'une échelle maximum: par ex. 25
.Axes(xlValue).MaximumScale = 25
End With
