Graph.export et resolution d'ecran

B

bobby

Guest
salut, ma question est la suivante :

J'ai un graph, graphique 1 sur ma feuil1, je cherche a le mettre sur un userform de maniere dynamique, (ca pas de probleme ca marche) j'utilise cette macro :

mongif = ThisWorkbook.Path & "\" & "graphique1.gif"
Set graph = Worksheets("fiche bat").ChartObjects("graphique 1").Chart
graph.Export Filename:=mongif, filtername:="GIF"
UserForm1.Image1.Picture = LoadPicture(Filename:=mongif)

pas de pb ca marche mais quand je change de resolution (par exemple je passe en 800*600 mon graphique et tronqué, apres des petit test j'ai remarqué que meme un copy du graph et coller sous word me donne un graph tronqué .... ???? quelqu un saurait pourquoi ?
 
T

Ti

Guest
va voir sur Vériti et charge le fichier démo FormGraphique qui te montrera une méthode pour mettre à jour un graph sans passer par ces fastidieuses écritures/lectures sur le disque.
Je pense qu'ainsi tes problèmes de résolution d'écran seront également résolus

<http://veriti.free.fr>
 
T

Ti

Guest
mais est-ce que tu n'essaierais pas de changer la résolution d'écran pendant que ton programme tourne, sans rebooter ?
Dans ce cas, pas étonnant que ça ne marche pas et j'ai bien peur que, sauf peut-être à passer par une usine à gaz à base d'API (et encore), tu n'y arrives pas
 
B

bobby

Guest
non non en faite le pb est tout simple :
passer ton moniteur en 800 x 600
fait une graph bidon sous excel
et essai de copier le graph sous word

chez moi, j'ai un graph pas entier (je te passe un fichier .gif du resultat ....)

merci de me repondre :eek:)
 

Pièces jointes

  • resultat.zip
    29 KB · Affichages: 19
  • resultat.zip
    29 KB · Affichages: 19
  • resultat.zip
    29 KB · Affichages: 18