Etiquettes de données nuage de points VBA

  • Initiateur de la discussion Initiateur de la discussion Vilain
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Vilain

XLDnaute Accro
Bonjour à tous,

Je cherche actuellement a créer une macro permettant de gérer les étiquettes de données et ce quel que soit le fichier. Par conséquent, ma macro ressemble à ca :
Code:
Sub Etiquettes()
Dim Données As Range
Dim Noms As Range
Dim i
Set Données = Application.InputBox("Sélectionnez la plage de données", "SÉLECTION", Type:=8)
Set Noms = Application.InputBox("Sélectionnez la plage des noms", "SÉLECTION", Type:=8)
With ActiveChart.SeriesCollection(1)
        .ApplyDataLabels Type:=xlDataLabelsShowLabel
        For i = 1 To Données.Count
          With .Points(i)
            .DataLabel.Text =
          End With
        Next i
   End With
ActiveChart.Deselect
End Sub
Mon problème concerne le datalabel.text. Je voudrais que le datalabel.text soit égale à ma variable noms, mais je ne parviens pas à le rédiger. Je joins mon fichier. N'hésiter à me demander plus de précisions si je n'ai pas été clair.
Merci d'avance 🙂
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
672
  • Question Question
Microsoft 365 Export données
Réponses
4
Affichages
649
Réponses
3
Affichages
582
Réponses
12
Affichages
969
Retour