je possede un classeur qui possede 64 feuilles. Dans chacune de ces feuilles
j'ai un graphique type 'histogramme' avec 2 series.
Je peux sur chacune de ses feuilles rajouter une statistique: je lance alors
une macro qui me cree un nouveau graphique (2 series en ligne).
Ce qui fait que j'ai entre 64 et 128 graphiques au maximum dans mon
classeur. Or, apres un certain temps, j'ai le message out of memeory, qd je
desire ajouter un graphique. Pourtant le nombre total de graphique est
toujours le meme, qd je lance une simulation qui va me sortir un graphique,
je supprime d'abord l'ancien graphique et re-cree ensuite un nouveau. Mais
apparemment le chart supprime est toujours dans la memoire... (c'est fou le
nombre de fois ou je dis le mot graphique !!! ;o))
La limite etant de 256 graphiques selon l'aide excel, je ne comprends pas
pourquoi j'ai ce message d'erreur. Peut-on 'flusher' de la memoire les
graphes supprimes ?
exemple de macro que je lance sur une feuille... (j'ai tout mis - desole
c'est long - mais je veux juste montrer la suppression et la creation de
graphique)
Public Sub GetOptiRatio()
Dim ratio As Double
If Left(ActiveSheet.Name, 4) <> "Stat" Then Exit Sub
Range("AL4:AN22").ClearContents
For Each ch In ActiveSheet.ChartObjects
ch.Delete
Next ch
mois = CDbl((Range("B3") - Range("B2")) / 30)
factor = 3 / 12 * 12 / mois ' = 3 / mois
pas = 0.1
If mois <= 6 Then
If Right(ActiveSheet.Name, 3) <> "opp" Then
maxi = 1.3 ' 130 %
couv = 0.1
pas = 0.1
Else
maxi = 1.5 ' 150 %
couv = 0.2
pas = 0.1
End If
Else
If Right(ActiveSheet.Name, 3) <> "opp" Then
maxi = 1.4 ' 140 %
couv = 0.1
pas = 0.15
Else
maxi = 1.6 ' 200 %
couv = 0.25
pas = 0.2
End If
End If
i = 1
je possede un classeur qui possede 64 feuilles. Dans chacune de ces feuilles j'ai un graphique type 'histogramme' avec 2 series. Je peux sur chacune de ses feuilles rajouter une statistique: je lance alors une macro qui me cree un nouveau graphique (2 series en ligne).
Ce qui fait que j'ai entre 64 et 128 graphiques au maximum dans mon classeur. Or, apres un certain temps, j'ai le message out of memeory, qd je desire ajouter un graphique. Pourtant le nombre total de graphique est toujours le meme, qd je lance une simulation qui va me sortir un graphique, je supprime d'abord l'ancien graphique et re-cree ensuite un nouveau. Mais apparemment le chart supprime est toujours dans la memoire... (c'est fou le nombre de fois ou je dis le mot graphique !!! ;o))
La limite etant de 256 graphiques selon l'aide excel, je ne comprends pas pourquoi j'ai ce message d'erreur. Peut-on 'flusher' de la memoire les graphes supprimes ?
exemple de macro que je lance sur une feuille... (j'ai tout mis - desole c'est long - mais je veux juste montrer la suppression et la creation de graphique)
Public Sub GetOptiRatio() Dim ratio As Double
If Left(ActiveSheet.Name, 4) <> "Stat" Then Exit Sub
Range("AL4:AN22").ClearContents
For Each ch In ActiveSheet.ChartObjects ch.Delete Next ch
mois = CDbl((Range("B3") - Range("B2")) / 30) factor = 3 / 12 * 12 / mois ' = 3 / mois
pas = 0.1
If mois <= 6 Then If Right(ActiveSheet.Name, 3) <> "opp" Then maxi = 1.3 ' 130 % couv = 0.1 pas = 0.1 Else maxi = 1.5 ' 150 % couv = 0.2 pas = 0.1 End If Else If Right(ActiveSheet.Name, 3) <> "opp" Then maxi = 1.4 ' 140 % couv = 0.1 pas = 0.15 Else maxi = 1.6 ' 200 % couv = 0.25 pas = 0.2 End If End If i = 1
je possede un classeur qui possede 64 feuilles. Dans chacune de ces feuilles
j'ai un graphique type 'histogramme' avec 2 series.
Je peux sur chacune de ses feuilles rajouter une statistique: je lance alors
une macro qui me cree un nouveau graphique (2 series en ligne).
Ce qui fait que j'ai entre 64 et 128 graphiques au maximum dans mon
classeur. Or, apres un certain temps, j'ai le message out of memeory, qd je
desire ajouter un graphique. Pourtant le nombre total de graphique est
toujours le meme, qd je lance une simulation qui va me sortir un graphique,
je supprime d'abord l'ancien graphique et re-cree ensuite un nouveau. Mais
apparemment le chart supprime est toujours dans la memoire... (c'est fou le
nombre de fois ou je dis le mot graphique !!! ;o))
La limite etant de 256 graphiques selon l'aide excel, je ne comprends pas
pourquoi j'ai ce message d'erreur. Peut-on 'flusher' de la memoire les
graphes supprimes ?
exemple de macro que je lance sur une feuille... (j'ai tout mis - desole
c'est long - mais je veux juste montrer la suppression et la creation de
graphique)
Public Sub GetOptiRatio()
Dim ratio As Double
If Left(ActiveSheet.Name, 4) <> "Stat" Then Exit Sub
Range("AL4:AN22").ClearContents
For Each ch In ActiveSheet.ChartObjects
ch.Delete
Next ch
mois = CDbl((Range("B3") - Range("B2")) / 30)
factor = 3 / 12 * 12 / mois ' = 3 / mois
pas = 0.1
If mois <= 6 Then
If Right(ActiveSheet.Name, 3) <> "opp" Then
maxi = 1.3 ' 130 %
couv = 0.1
pas = 0.1
Else
maxi = 1.5 ' 150 %
couv = 0.2
pas = 0.1
End If
Else
If Right(ActiveSheet.Name, 3) <> "opp" Then
maxi = 1.4 ' 140 %
couv = 0.1
pas = 0.15
Else
maxi = 1.6 ' 200 %
couv = 0.25
pas = 0.2
End If
End If
i = 1
je possede un classeur qui possede 64 feuilles. Dans chacune de ces feuilles j'ai un graphique type 'histogramme' avec 2 series. Je peux sur chacune de ses feuilles rajouter une statistique: je lance alors une macro qui me cree un nouveau graphique (2 series en ligne).
Ce qui fait que j'ai entre 64 et 128 graphiques au maximum dans mon classeur. Or, apres un certain temps, j'ai le message out of memeory, qd je desire ajouter un graphique. Pourtant le nombre total de graphique est toujours le meme, qd je lance une simulation qui va me sortir un graphique, je supprime d'abord l'ancien graphique et re-cree ensuite un nouveau. Mais apparemment le chart supprime est toujours dans la memoire... (c'est fou le nombre de fois ou je dis le mot graphique !!! ;o))
La limite etant de 256 graphiques selon l'aide excel, je ne comprends pas pourquoi j'ai ce message d'erreur. Peut-on 'flusher' de la memoire les graphes supprimes ?
exemple de macro que je lance sur une feuille... (j'ai tout mis - desole c'est long - mais je veux juste montrer la suppression et la creation de graphique)
Public Sub GetOptiRatio() Dim ratio As Double
If Left(ActiveSheet.Name, 4) <> "Stat" Then Exit Sub
Range("AL4:AN22").ClearContents
For Each ch In ActiveSheet.ChartObjects ch.Delete Next ch
mois = CDbl((Range("B3") - Range("B2")) / 30) factor = 3 / 12 * 12 / mois ' = 3 / mois
pas = 0.1
If mois <= 6 Then If Right(ActiveSheet.Name, 3) <> "opp" Then maxi = 1.3 ' 130 % couv = 0.1 pas = 0.1 Else maxi = 1.5 ' 150 % couv = 0.2 pas = 0.1 End If Else If Right(ActiveSheet.Name, 3) <> "opp" Then maxi = 1.4 ' 140 % couv = 0.1 pas = 0.15 Else maxi = 1.6 ' 200 % couv = 0.25 pas = 0.2 End If End If i = 1
Call MiseEnPage Call GetStats(Range("D12"), Range("AB3"), True) End Sub
-- Cordialement,
Michel Gaboly http://www.gaboly.com
Jojo
"Michel Gaboly" wrote in message news:
Bonjour,
Ne serait-il pas plus simple d simplement mettre à jour la plage en prendre en compte pour un graphique donné.
En clair sélectionner le graphique concerné, et le metre à jour, plutôt que le détruire et en refaire un autre.
Bonjour Michel,
J'y avais pense effectivement, le probleme de mon classeur c'est que mes feuilles elles-memes sont supprimees et recrees tous les matins. Il n'y pas moyen de creer des feuilles statiques car elles representent des donnes qui vont varier au cours du temps.
PS: Pour ceux que cela interessent:il s'agit ici d'avoir une feuille par strategie financiere: swap contre contrat future (donc une maturite 1m, 2m, etc... jusqu'a 1 an, contre les contrats futures decembre 2003, mars, juin et septembre 2004) Ainsi, une strategie 1m contre decembre 2003 est possible mais dans 6 mois la feuille sera inutile...
Amicalement Jojo
"Michel Gaboly" <michel@Suppgaboly.com> wrote in message
news:3FAF8503.B1F4729E@Suppgaboly.com...
Bonjour,
Ne serait-il pas plus simple d simplement mettre à jour la plage
en prendre en compte pour un graphique donné.
En clair sélectionner le graphique concerné, et le metre à jour, plutôt
que le détruire et en refaire un autre.
Bonjour Michel,
J'y avais pense effectivement, le probleme de mon classeur c'est que mes
feuilles elles-memes sont supprimees et recrees tous les matins. Il n'y pas
moyen de creer des feuilles statiques car elles representent des donnes qui
vont varier au cours du temps.
PS: Pour ceux que cela interessent:il s'agit ici d'avoir une feuille par
strategie financiere: swap contre contrat future (donc une maturite 1m, 2m,
etc... jusqu'a 1 an, contre les contrats futures decembre 2003, mars, juin
et septembre 2004) Ainsi, une strategie 1m contre decembre 2003 est possible
mais dans 6 mois la feuille sera inutile...
Ne serait-il pas plus simple d simplement mettre à jour la plage en prendre en compte pour un graphique donné.
En clair sélectionner le graphique concerné, et le metre à jour, plutôt que le détruire et en refaire un autre.
Bonjour Michel,
J'y avais pense effectivement, le probleme de mon classeur c'est que mes feuilles elles-memes sont supprimees et recrees tous les matins. Il n'y pas moyen de creer des feuilles statiques car elles representent des donnes qui vont varier au cours du temps.
PS: Pour ceux que cela interessent:il s'agit ici d'avoir une feuille par strategie financiere: swap contre contrat future (donc une maturite 1m, 2m, etc... jusqu'a 1 an, contre les contrats futures decembre 2003, mars, juin et septembre 2004) Ainsi, une strategie 1m contre decembre 2003 est possible mais dans 6 mois la feuille sera inutile...
