Pour oter la liaison avec les donn=E9es source d'un=20
graphique, la solution suivante est propos=E9e chez EXECLABO
"Tu s=E9lectionnes la(les) s=E9ries de ton graphique >> tu=20
cliques dans la barre
de formule >> puis F9, ce qui a pour effet de remplacer=20
par des valeurs les
r=E9f=E9rences =E0 des cellules donc plus de liaison avec le=20
classeur d'origine
mais contrepartie : ton graphique n'est plus=20
qu'une "image" !"
En enregistrant cette solution en automatique, la liason=20
est remplac=E9e par une formule qui reprend les valeurs de=20
la s=E9rie.
Comment le traduire en VBA sans obtenir le r=E9sultat de la=20
formule ?
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
ru-th
Salut
testes Sub TEST() With ActiveChart y = .SeriesCollection.Count For i = 1 To y With .SeriesCollection(i) .Values = .Values .XValues = .XValues .Name = .Name End With Next i End With End Sub
a+ rural thierry
"andré" a écrit dans le message de news: 093501c3db6c$f1fac400$ Pour oter la liaison avec les données source d'un graphique, la solution suivante est proposée chez EXECLABO "Tu sélectionnes la(les) séries de ton graphique >> tu cliques dans la barre de formule >> puis F9, ce qui a pour effet de remplacer par des valeurs les références à des cellules donc plus de liaison avec le classeur d'origine mais contrepartie : ton graphique n'est plus qu'une "image" !" En enregistrant cette solution en automatique, la liason est remplacée par une formule qui reprend les valeurs de la série. Comment le traduire en VBA sans obtenir le résultat de la formule ?
Salut
testes
Sub TEST()
With ActiveChart
y = .SeriesCollection.Count
For i = 1 To y
With .SeriesCollection(i)
.Values = .Values
.XValues = .XValues
.Name = .Name
End With
Next i
End With
End Sub
a+
rural thierry
"andré" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 093501c3db6c$f1fac400$a601280a@phx.gbl...
Pour oter la liaison avec les données source d'un
graphique, la solution suivante est proposée chez EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu
cliques dans la barre
de formule >> puis F9, ce qui a pour effet de remplacer
par des valeurs les
références à des cellules donc plus de liaison avec le
classeur d'origine
mais contrepartie : ton graphique n'est plus
qu'une "image" !"
En enregistrant cette solution en automatique, la liason
est remplacée par une formule qui reprend les valeurs de
la série.
Comment le traduire en VBA sans obtenir le résultat de la
formule ?
testes Sub TEST() With ActiveChart y = .SeriesCollection.Count For i = 1 To y With .SeriesCollection(i) .Values = .Values .XValues = .XValues .Name = .Name End With Next i End With End Sub
a+ rural thierry
"andré" a écrit dans le message de news: 093501c3db6c$f1fac400$ Pour oter la liaison avec les données source d'un graphique, la solution suivante est proposée chez EXECLABO "Tu sélectionnes la(les) séries de ton graphique >> tu cliques dans la barre de formule >> puis F9, ce qui a pour effet de remplacer par des valeurs les références à des cellules donc plus de liaison avec le classeur d'origine mais contrepartie : ton graphique n'est plus qu'une "image" !" En enregistrant cette solution en automatique, la liason est remplacée par une formule qui reprend les valeurs de la série. Comment le traduire en VBA sans obtenir le résultat de la formule ?
andre
Merci pour cette réponse Celà marche pour des graphiques de style SECTEURS mais en supprimant le premier point de ..Values, ..XValues Celà ne marche pas pour un graphique combiné de type HISTOGRAMME et COURBE
a +
-----Message d'origine----- Salut
testes Sub TEST() With ActiveChart y = .SeriesCollection.Count For i = 1 To y With .SeriesCollection(i) ..Values = .Values ..XValues = .XValues ..Name = .Name End With Next i End With End Sub
a+ rural thierry
"andré" a écrit dans le message de
news: 093501c3db6c$f1fac400$ Pour oter la liaison avec les données source d'un graphique, la solution suivante est proposée chez EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu cliques dans la barre de formule >> puis F9, ce qui a pour effet de remplacer par des valeurs les références à des cellules donc plus de liaison avec le classeur d'origine mais contrepartie : ton graphique n'est plus qu'une "image" !" En enregistrant cette solution en automatique, la liason est remplacée par une formule qui reprend les valeurs de la série. Comment le traduire en VBA sans obtenir le résultat de la formule ?
.
Merci pour cette réponse
Celà marche pour des graphiques de style SECTEURS mais en
supprimant le premier point de ..Values, ..XValues
Celà ne marche pas pour un graphique combiné de type
HISTOGRAMME et COURBE
a +
-----Message d'origine-----
Salut
testes
Sub TEST()
With ActiveChart
y = .SeriesCollection.Count
For i = 1 To y
With .SeriesCollection(i)
..Values = .Values
..XValues = .XValues
..Name = .Name
End With
Next i
End With
End Sub
a+
rural thierry
"andré" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 093501c3db6c$f1fac400$a601280a@phx.gbl...
Pour oter la liaison avec les données source d'un
graphique, la solution suivante est proposée chez
EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu
cliques dans la barre
de formule >> puis F9, ce qui a pour effet de remplacer
par des valeurs les
références à des cellules donc plus de liaison avec le
classeur d'origine
mais contrepartie : ton graphique n'est plus
qu'une "image" !"
En enregistrant cette solution en automatique, la liason
est remplacée par une formule qui reprend les valeurs de
la série.
Comment le traduire en VBA sans obtenir le résultat de la
formule ?
Merci pour cette réponse Celà marche pour des graphiques de style SECTEURS mais en supprimant le premier point de ..Values, ..XValues Celà ne marche pas pour un graphique combiné de type HISTOGRAMME et COURBE
a +
-----Message d'origine----- Salut
testes Sub TEST() With ActiveChart y = .SeriesCollection.Count For i = 1 To y With .SeriesCollection(i) ..Values = .Values ..XValues = .XValues ..Name = .Name End With Next i End With End Sub
a+ rural thierry
"andré" a écrit dans le message de
news: 093501c3db6c$f1fac400$ Pour oter la liaison avec les données source d'un graphique, la solution suivante est proposée chez EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu cliques dans la barre de formule >> puis F9, ce qui a pour effet de remplacer par des valeurs les références à des cellules donc plus de liaison avec le classeur d'origine mais contrepartie : ton graphique n'est plus qu'une "image" !" En enregistrant cette solution en automatique, la liason est remplacée par une formule qui reprend les valeurs de la série. Comment le traduire en VBA sans obtenir le résultat de la formule ?
.
ru-th
re- combien de données dans ton tableau ?
testes en arrondissant tes données .Values = Application.Round(.Values, 2)
a+ rural thierry
"andre" a écrit dans le message de news: 0aa601c3dc37$dcbfdfa0$ Merci pour cette réponse Celà marche pour des graphiques de style SECTEURS mais en supprimant le premier point de ..Values, ..XValues Celà ne marche pas pour un graphique combiné de type HISTOGRAMME et COURBE
a +
-----Message d'origine----- Salut
testes Sub TEST() With ActiveChart y = .SeriesCollection.Count For i = 1 To y With .SeriesCollection(i) ..Values = .Values ..XValues = .XValues ..Name = .Name End With Next i End With End Sub
a+ rural thierry
"andré" a écrit dans le message de
news: 093501c3db6c$f1fac400$ Pour oter la liaison avec les données source d'un graphique, la solution suivante est proposée chez EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu cliques dans la barre de formule >> puis F9, ce qui a pour effet de remplacer par des valeurs les références à des cellules donc plus de liaison avec le classeur d'origine mais contrepartie : ton graphique n'est plus qu'une "image" !" En enregistrant cette solution en automatique, la liason est remplacée par une formule qui reprend les valeurs de la série. Comment le traduire en VBA sans obtenir le résultat de la formule ?
.
re-
combien de données dans ton tableau ?
testes en arrondissant tes données
.Values = Application.Round(.Values, 2)
a+
rural thierry
"andre" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 0aa601c3dc37$dcbfdfa0$a301280a@phx.gbl...
Merci pour cette réponse
Celà marche pour des graphiques de style SECTEURS mais en
supprimant le premier point de ..Values, ..XValues
Celà ne marche pas pour un graphique combiné de type
HISTOGRAMME et COURBE
a +
-----Message d'origine-----
Salut
testes
Sub TEST()
With ActiveChart
y = .SeriesCollection.Count
For i = 1 To y
With .SeriesCollection(i)
..Values = .Values
..XValues = .XValues
..Name = .Name
End With
Next i
End With
End Sub
a+
rural thierry
"andré" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 093501c3db6c$f1fac400$a601280a@phx.gbl...
Pour oter la liaison avec les données source d'un
graphique, la solution suivante est proposée chez
EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu
cliques dans la barre
de formule >> puis F9, ce qui a pour effet de remplacer
par des valeurs les
références à des cellules donc plus de liaison avec le
classeur d'origine
mais contrepartie : ton graphique n'est plus
qu'une "image" !"
En enregistrant cette solution en automatique, la liason
est remplacée par une formule qui reprend les valeurs de
la série.
Comment le traduire en VBA sans obtenir le résultat de la
formule ?
testes en arrondissant tes données .Values = Application.Round(.Values, 2)
a+ rural thierry
"andre" a écrit dans le message de news: 0aa601c3dc37$dcbfdfa0$ Merci pour cette réponse Celà marche pour des graphiques de style SECTEURS mais en supprimant le premier point de ..Values, ..XValues Celà ne marche pas pour un graphique combiné de type HISTOGRAMME et COURBE
a +
-----Message d'origine----- Salut
testes Sub TEST() With ActiveChart y = .SeriesCollection.Count For i = 1 To y With .SeriesCollection(i) ..Values = .Values ..XValues = .XValues ..Name = .Name End With Next i End With End Sub
a+ rural thierry
"andré" a écrit dans le message de
news: 093501c3db6c$f1fac400$ Pour oter la liaison avec les données source d'un graphique, la solution suivante est proposée chez EXECLABO
"Tu sélectionnes la(les) séries de ton graphique >> tu cliques dans la barre de formule >> puis F9, ce qui a pour effet de remplacer par des valeurs les références à des cellules donc plus de liaison avec le classeur d'origine mais contrepartie : ton graphique n'est plus qu'une "image" !" En enregistrant cette solution en automatique, la liason est remplacée par une formule qui reprend les valeurs de la série. Comment le traduire en VBA sans obtenir le résultat de la formule ?