Elargir sélection de données d'un graphique

Fermé

Noune - 22 mai 2019 à 11:54
ccm81 Messages postés 10854 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 26 avril 2024 - 27 mai 2019 à 15:00

Bonjour,

J'essaie de mettre en place une macro qui, lorsque j'ajouterai une ligne de données dans mon classeur, ajouterait également cette ligne dans la sélection de données de mon graphique.
Cependant il semblerait qu'il y ait un soucis dans le code et je ne comprend pas pourquoi.

Voici mon code :

ActiveSheet.ChartObjects("Graphique 1").Activate

Range("A2").Select

Range(Selection, Selection.End(xlDown)).Select

A = Range("A1:D" & [D65536].End(xlDown).Row).Select

ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range(A), PlotBy:=xlColumns

La ligne qui semble poser problème est :
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range(A), PlotBy:=xlColumns

Je ne comprends pas où est l'erreur.

Merci par avance pour votre aide
Bonne journée

A voir également:

Elargir sélection de données d'un graphique
Changer carte graphique - Guide
Faire un graphique sur excel - Guide
Effacer les données de navigation - Guide
Reinstaller windows sans perte de données - Guide
Tnt base de données vide ✓ - Forum TNT / Satellite / Réception

2 réponses

Réponse 1 / 2

ccm81 Messages postés 10854 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 26 avril 2024 2 404
27 mai 2019 à 15:00

Bonjour à tous les deux

Si tu tiens absolument à une macro, essaies ceci

Public Sub ok()
Dim plage As String, lifin As Long
lifin = Range("A" & Rows.Count).End(xlUp).Row
ActiveSheet.ChartObjects("Graphique 1").Activate
plage = "A1:D" & lifin
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range(plage), PlotBy:=xlColumns
End Sub

Cdlmnt

Réponse 2 / 2

tuxboy Messages postés 994 Date d'inscription lundi 23 juillet 2012 Statut Membre Dernière intervention 28 mai 2019 189
27 mai 2019 à 14:45

Salut,

Est-ce impératif de passer par une macro ou bien ne serait-il pas plus simple de nommer une variable dynamique avec la fonction DECALER :
https://www.developpez.net/forums/d647917/logiciels/microsoft-office/excel/graphique-excel-plage-donnees-variable-longueur/

??? ;)

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Nuages de point avec abscisses différentes

Que veut dire Carte Graphique OC??

Exemple de base de données access

Outil sélection Adobe Illustrator

Discussions similaires

Newsletters