Chartspace ou Modpastpicture

[aero60]

Bonjour a tous,
Tout est dans le titre, je réalise actuellement une programmation sous userform et j'utilise le modpastpicture pour afficher un graphique et dans l'objectif d'optimiser mon code j'aurais voulu savoir quelle était le choix le plus judicieux.
Autre problème j'ai réaliser se petit userform séparément dans ce cas là la rapidité est encore raisonnable mais quand je l'intègre dans mon programme mère les chose se gâte.

Ps: voici mon programme si vous penser pouvoir l'optimiser de quelque façon n'hésiter pas je suis preneur je tourne sous Excel 2003 pour information
Ce programme a été réalisé en collaboration avec Mécano41 que je remerci pour son aide.
2shared - download Buse5.xls

Si quelqu'un peut me conseiller, merci d'avance
Cordialement
Aero 60

 

[Hulk]

Re : Chartspace ou Modpastpicture

Hello Forum, Aero,

Perso, je n'ai pas réussi à télécharger ton fichier...

Utilise plutôt cijoint.fr.

Cdt, Hulk.

 

[aero60]

Re : Chartspace ou Modpastpicture

voici le fichier

Cijoint.fr - Service gratuit de dépôt de fichiers

Merci d'avance
Cordialement
Aero60

 

[aero60]

Re : Chartspace ou Modpastpicture

Bonjour,
J'ai fait des éssai et j'ai comparé la methode avec modpastepicture et la methode avec exportation gif comme suit:

Dim CurrentChart As Chart
            Dim Fname As String
            Set CurrentChart = ActiveSheet.ChartObjects(1).Chart
            Fname = ThisWorkbook.Path & Application.PathSeparator & "temp.gif"
            CurrentChart.Export Filename:=Fname, FilterName:="gif"
            Image1.Picture = LoadPicture(Fname)
            Kill ThisWorkbook.Path & Application.PathSeparator & "temp.gif"

et je peut vous dire que le modpastepicture est beaucoup plus rapide mais je n'arrive pas à utilisé owc11 quelqu'un pourrait t'il m'aider voir le fichier joint plus haut.
Merci d'avance.
Cordialement
Aero60