begin process at 2012 02 12 23:28:43
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Graphique

 > ENREGISTREMENT D'UN GRAPHIQUE EXCEL SOUS FORME D'IMAGE JPG

ENREGISTREMENT D'UN GRAPHIQUE EXCEL SOUS FORME D'IMAGE JPG


 Information sur la source

Note :
3,25 / 10 - par 4 personnes
3,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Graphique Niveau :Débutant Date de création :18/01/2005 Date de mise à jour :08/03/2005 16:22:50 Vu :15 600

Auteur : Draconagi

Ecrire un message privé
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

 Description

Voilà un petit code qui permet d'extraire un graphique pour en faire une image JPG.

Source

  • 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
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

 Conclusion

Si vous avez des problèmes. N'hésitez pas.

Bon courage à tous.


 Historique

08 mars 2005 16:22:55 :
J'ai trouvé un moyen simple d'extraire le graphique et de l'enregister du même coup.

 Sources du même auteur

MOT DE PASSE POUR RENTRER DANS UNE APPLICATION ACCESS

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) CREER UN GIF ANIMÉ par Le Pivert
Source avec une capture GRAPH PHP COURBE DE CHARGE par s.defaye
Source avec Zip Source avec une capture BOULE DE CRISTAL par BLUEBIBUBBLE
VB6 - DÉPLACEMENT D'UN CONTRÔLE SUR UN SEGMENT DE DROITE DÉL... par ucfoutu
Source avec Zip Source .NET (Dotnet) APPLICATION DE DESSIN par fsafsafsaf

Commentaires et avis

Commentaire de joeletigre le 26/01/2006 13:41:32

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 jpeg
Sub 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

Commentaire de zeunz le 18/05/2006 11:29:52

aucune explication....

Commentaire de mathieugamin le 08/12/2006 14:42:27

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 !

Commentaire de boumy44 le 15/06/2007 22:34:07

franchement super..jai galerer pour le faire seul  alors que cest aussi simple!!!

Commentaire de eridyms le 16/09/2010 03:35:40

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 procedure
svp c'est urgent aider moi.
Merci d'avance....

Commentaire de choucas47 le 30/03/2011 09:01:03

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 ?

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,437 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales