Bonjour,
Je suis nouveau sur ce forum et j'ai une question à vous poser.
J'ai créé une macro permettant de créer un graphe à partir d'une table importé d'acces
voici le code:
'Création d'un graphique dans la feuille active.
ActiveSheet.Shapes.AddChart
'Activation du graphique sans le sélectionner
ActiveSheet.ChartObjects(1).Activate
'Propriétés du graphique
With ActiveChart
'Selection de la source des données
'Cette méthode fonctionne très bien pour ce tableau
'Le nom abscices et des ordonnées est trouvé automatiquement par Excel
'Il y a une autre méthode pour créer chaque série une à une. Mais là c'est pour faire simple.
.SetSourceData Source:=Worksheets(1).Range("A7"), PlotBy:=xlRows
'Définition du Type du Graphique en courbes
.ChartType = xlLine
'Déplacement du graphique dans une feuille Graph plutôt que de le laisser dans une Feuille Sheet
.Location Where:=xlLocationAsNewSheet
End With
Maintenant j'aimerai ci cela est possible supprimer dans ce graphe les valeurs inférieur à 50.
merci à tous
Je suis nouveau sur ce forum et j'ai une question à vous poser.
J'ai créé une macro permettant de créer un graphe à partir d'une table importé d'acces
voici le code:
'Création d'un graphique dans la feuille active.
ActiveSheet.Shapes.AddChart
'Activation du graphique sans le sélectionner
ActiveSheet.ChartObjects(1).Activate
'Propriétés du graphique
With ActiveChart
'Selection de la source des données
'Cette méthode fonctionne très bien pour ce tableau
'Le nom abscices et des ordonnées est trouvé automatiquement par Excel
'Il y a une autre méthode pour créer chaque série une à une. Mais là c'est pour faire simple.
.SetSourceData Source:=Worksheets(1).Range("A7"), PlotBy:=xlRows
'Définition du Type du Graphique en courbes
.ChartType = xlLine
'Déplacement du graphique dans une feuille Graph plutôt que de le laisser dans une Feuille Sheet
.Location Where:=xlLocationAsNewSheet
End With
Maintenant j'aimerai ci cela est possible supprimer dans ce graphe les valeurs inférieur à 50.
merci à tous