Simplification VBA

Bonjour,

J'ai un graphique qui se crée déjà avec une macro mais j'aimerai changer les étiquettes de données : pas avoir le nom de la catégorie mais le nom de la série.
Sauf que n'étais pas très douée je ne trouve pas de solution à part celle là qui est franchement pas simple :

ActiveChart.ChartArea.Select
ActiveChart.FullSeriesCollection(1).DataLabels.Select
Selection.ShowSeriesName = True
Selection.ShowCategoryName = False

ActiveChart.FullSeriesCollection(2).DataLabels.Select
Selection.ShowSeriesName = True
Selection.ShowCategoryName = False

ActiveChart.FullSeriesCollection(3).DataLabels.Select
Selection.ShowSeriesName = True
Selection.ShowCategoryName = False

ActiveChart.FullSeriesCollection(4).DataLabels.Select
Selection.ShowSeriesName = True
Selection.ShowCategoryName = False

Edit modo : merci de mettre le code entre balises SVP avec le bouton </>

J'imagine qu'il y a beaucoup plus simple.

Merci d'avance,

Stéphanie

Bonjour

tu a essayé avec un truc comme

ActiveChart.ChartArea.Select

For a = 1 to 4

ActiveChart.FullSeriesCollection(a).DataLabels.Select
Selection.ShowSeriesName = True
Selection.ShowCategoryName = False

next

Edit modo : merci de mettre le code entre balises SVP avec le bouton </>

Bonjour à vous 2

Petit rappel de a charte du forum [A LIRE AVANT DE POSTER] ainsi que ses fonctionnalités
qui vous aideront dans vos demandes et réponses sur ce forum.

• Pour plus de lisibilité, utilisez le bouton </> pour insérer vos codes VBA (et si possible aussi pour vos formules Excel).

De plus @fathlaur,

• Un minimum de politesse est de rigueur (bonjour, SVP, merci, ...),
  sans cela vous aurez peu de chance d'obtenir une réponse et vous risquez de voir votre message supprimé par un modérateur.

Merci d'y faire attention SVP

Cordialement.

Bonjour BrunoM45 : merci beaucoup pour le rappel (je n'avais pas vu les petits crochets)

Bonjour fathleur : c'est parfait ça marche super bien merci beaucoup !! Je n'ai qu'a modifié le nombre d'entrées dont j'ai besoin.

Passez une bonne journée tous les deux !!
Cordialement,
Stéphanie

Bonjour

C'est avec plaisir si cela a pu d'aider un peu

Bonne journée
BrunoM45, désolé oui le bonjour est un minimum