j'ai un bout de code qui met tous les graph d'un classeur en graph predefini:
Sub chart()
For zz = 1 To ActiveWorkbook.Charts.Count
Charts(zz).Select
Application.AddChartAutoFormat chart:=ActiveChart, Name:="test" & zz,
Description:=""
Next
End Sub
quant le code s'execute il me demande d'enregister mon classeur
je ne comprend pas pourquoi?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Yvan
Bonjour Thierry
J'ai testé ton code. Aucune demande d'enregistrement, sauf évidemment à la fermeture du classeur si je modifie une valeur de données!
@+
Yvan
"Thierry" a écrit dans le message de news:
Bonjour,
j'ai un bout de code qui met tous les graph d'un classeur en graph predefini:
Sub chart() For zz = 1 To ActiveWorkbook.Charts.Count Charts(zz).Select Application.AddChartAutoFormat chart:¬tiveChart, Name:="test" & zz, Description:="" Next End Sub
quant le code s'execute il me demande d'enregister mon classeur je ne comprend pas pourquoi?
merci pour vos reponses éclairées
Bonjour Thierry
J'ai testé ton code. Aucune demande d'enregistrement, sauf évidemment à la
fermeture du classeur si je modifie une valeur de données!
@+
Yvan
"Thierry" <Thierry@discussions.microsoft.com> a écrit dans le message de
news: 8AF2FBDC-2099-4A0D-8115-43FD5C0531F7@microsoft.com...
Bonjour,
j'ai un bout de code qui met tous les graph d'un classeur en graph
predefini:
Sub chart()
For zz = 1 To ActiveWorkbook.Charts.Count
Charts(zz).Select
Application.AddChartAutoFormat chart:¬tiveChart, Name:="test" & zz,
Description:=""
Next
End Sub
quant le code s'execute il me demande d'enregister mon classeur
je ne comprend pas pourquoi?
J'ai testé ton code. Aucune demande d'enregistrement, sauf évidemment à la fermeture du classeur si je modifie une valeur de données!
@+
Yvan
"Thierry" a écrit dans le message de news:
Bonjour,
j'ai un bout de code qui met tous les graph d'un classeur en graph predefini:
Sub chart() For zz = 1 To ActiveWorkbook.Charts.Count Charts(zz).Select Application.AddChartAutoFormat chart:¬tiveChart, Name:="test" & zz, Description:="" Next End Sub
quant le code s'execute il me demande d'enregister mon classeur je ne comprend pas pourquoi?