Dim NomGraph As String 'On récupére le nom graphique Fich As String ' Adresse de reception du graphique NomGraph = ActiveChart.Name Fich = c:/...... ' l'endroit où vous voulez mettre votre graphique ActiveChart.Export ActiveChart.Export Filename:= Fich & NomGraph & ".jpg", FilterName:="JPEG" end sub
L'idée est très bonne et très pratique mais pour un débutant je pense qu'il faut mettre la procédure complète et correcte.' Procédure permettant enregistrer un graphique sélectionné dans un fichier jpegSub EnregistreGraphique()Dim NomGraph As String 'On récupére le nom graphique sélectionnéDim Fich As String ' Adresse de reception du graphique NomGraph = ActiveChart.Name Fich = "c:/......"' l'endroit où vous voulez mettre votre graphique ActiveChart.Export Filename:= Fich & NomGraph & ".jpg", FilterName:="JPEG" end sub
aucune explication....
Super ce code !Y'a-t-il un moyen de faire des gif transprents? GIF tout seul ça marche, mais comme il faut sélectionner le graphique, l'arrière plan blanc réapparaît (alors qu'il est transparent dans le format graphs que j'ai configurés)...Merci !
franchement super..jai galerer pour le faire seul alors que cest aussi simple!!!
slt moi j'avais trop besoin de ce code ,maintenant je l'ai je ne sais pas comment l'exploitéJe suis un debutant.en fait j'ai feuille d'excel sur lequel il y a un graph obtenu a partir de donné que j'exporte depuis le programme vb6.le classeur dans lequel se trouve la feuille avec graphe s'appelle "Essai.xlsx"Comment l'inserer dans ta proceduresvp c'est urgent aider moi.Merci d'avance....
Moi il me dit que ActiveChart n'est pas déclarer. Alors que j'ai importer toute les références d'Excel.Quelqu'un peut il m'aider a savoir pourquoi ?
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 873 951 membres 229 nouveaux aujourd'hui 16 151 membres club