Sujet Précédent Sujet Suivant

Stocker nom onglet dans une variable

Fermé
Enshuk - 6 mars 2020 à 09:07
ccm81 Messages postés 10854 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 26 avril 2024 - 6 mars 2020 à 11:41
Bonjour,

J'ai un graphique par onglet dans mon classeur Excel, qui se nomme tous par défaut "Graphique1"

Je voudrais que chaque graphique porte le nom de son onglet.

J'ai fait ce code qui s'applique à l'onglet actif, mais je bloque pour le faire pour tous les onglets du classeur.

Merci d'avance. 

Sub testerzae()

Dim nomfeuille As String
Dim graphique As ChartObject
Dim onglet As Worksheet
nomfeuille = ActiveSheet.Name
For Each onglet In ActiveWorkbook.Worksheets
    For Each graphique In onglet.ChartObjects
        graphique.Name = nomfeuille
    Next graphique
Next onglet


End Sub



Configuration: Windows / Chrome 78.0.3904.97

2 réponses

Réponse 1 / 2
Enshuk
Modifié le 6 mars 2020 à 09:28
J'ai trouvé pour ceux qui veulent la solution : 

    ongletname = onglet.Name
0
Réponse 2 / 2
ccm81 Messages postés 10854 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 26 avril 2024 2 404
Modifié le 6 mars 2020 à 11:42
Bonjour

Et pour ton code 

Public Sub ok()
Dim onglet As Worksheet
For Each onglet In ActiveWorkbook.Worksheets
   onglet.ChartObjects(1).Name = onglet.Name
Next onglet
End Sub


Cdlmnt
0

Discussions similaires

"Nom de l'adresse" lors d'une inscription sur une site
ScarexStupid -
Rossignol -

9 réponses
programme qui n'affiche pas le mot secret
EMy.chev -
yg_be -

3 réponses
Annuaire portable gratuit à partir d'un nom
dani26 -
Authority -

9 réponses
Trouver un nom avec une adresse
lakshmi66 -
Nath01 -

11 réponses
Comment trouver une adresse avec un nom de famille ?
nanou69 -
chrys -

9 réponses