Graph.export et resolution d'ecran

  • Initiateur de la discussion Initiateur de la discussion bobby
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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 ?
 
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>
 
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
 
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 😱)
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

S
Réponses
7
Affichages
2 K
TheSpreadSheet_User
T
Retour