Discussion :

[Ravnos]

Bonjour,

Je viens auprès de vous après de nombreuses recherches et tests infructueux(ses). J'ai un niveau assez moyen en VBA.
J'essai de faire un code VBA qui permettrai de détecter quand un utilisateur créé un graphique (ChartOjects) et d'en extraire le type.
Je sais qu'il existe l’événement newchart lié au Workbook mais celui-ci ne détecte pas la création d'un ChartObjects. J'ai trouvé ce bout de code et essayé de l'implémenté dans l'événement SheetChange mais rien ne se passe...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim c As ChartObjects
 For Each c In ActiveSheet.ChartObjects
   MsgBox ("trouvé")
 Next

Je n'ai vraiment plus d'idées vers laquelle m'orienter donc je m'en remet à vos grand esprits.

Merci d'avance,

[lrnv69]

Si la question est : " Comment savoir dans une macro si un graphique a été créer ou pas ", alors la réponse est la suivante : Vérifie juste que Ubound(graphiques) n'a pas changer :

Code VBA :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
nb_graphiques = 0
for each sheet in Worksheets
 
    nb_graphique = nb_graphiques + Ubound(sheet.Chartobjects)
 
next sheet
 
if nb_graphiques > old_nb_graphiques then msgbox " de nouveaux graphs sont apparus !"

[Ravnos]

Bonjour lrnv69,

Merci de ta réponse, ce n'est pas bête comme réflexion mais ce n'est pas ma question.
Ce serais plus, est ce que l'utilisateur vient de créer un graphique? Si oui, je récupère le type de graphique qu'il vient de créer.
J'essaie quand même de voir comment tourner ça.

Merci,

[Ravnos]

Bonjour et désolé du double post,

J'ai finalement résolu mon problème et c'était bien l’événement "Application_WorkbookNewChart", c'est juste moi qui l'utilisait mal.

Bonne continuation à vous!