Par défaut zoomer des courbes en VBA
Résolu/Fermé
qwerty_213
-
Modifié par crapoulou le 9/11/2016 à 13:16
qwerty_213 Messages postés 26 Date d'inscription mardi 12 août 2014 Statut Membre Dernière intervention 22 février 2022 - 12 nov. 2016 à 17:51
qwerty_213 Messages postés 26 Date d'inscription mardi 12 août 2014 Statut Membre Dernière intervention 22 février 2022 - 12 nov. 2016 à 17:51
A voir également:
- Par défaut zoomer des courbes en VBA
- Erreur 1004 vba ✓ - Forum VB / VBA
- Find vba - Astuces et Solutions
- L'indice n'appartient pas à la sélection vba - Forum VB / VBA
- Vba range avec variable ✓ - Forum VB / VBA
- Vba convertir texte en nombre ✓ - Forum VB / VBA
2 réponses
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
11 nov. 2016 à 12:37
11 nov. 2016 à 12:37
Suggestion :
Ou, mieux :
ActiveSheet.ChartObjects( G ).Activate
Ou, mieux :
Option Explicit
Sub Macro1()
Dim un_graphique As ChartObject
Dim zmin As Long
Dim zmax As Long
zmin = 30000
zmax = 31000
For Each un_graphique In ActiveSheet.ChartObjects
un_graphique.Axes(xlCategory).MinimumScale = zmin
un_graphique.Axes(xlCategory).MaximumScale = zmax
Next
End Sub
je te remercie, ca marche bien
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
11 nov. 2016 à 18:53
11 nov. 2016 à 18:53
Merci alors de marquer le sujet comme résolu.
qwerty_213
Messages postés
26
Date d'inscription
mardi 12 août 2014
Statut
Membre
Dernière intervention
22 février 2022
>
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
12 nov. 2016 à 17:51
12 nov. 2016 à 17:51
comment faire! je ne vois pas l'icone