BONJOUR
JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU
FORMAT JPG.
ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION
PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN
PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE
AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU
GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Frédéric Sigonneau
Bonjour,
Une solution classique (ici empruntée à LL), qui fonctionne aussi pour créer des .gif (plus petits semble-t-il que les .jpg) :
Sub ExportRangeAsImage() 'd'après LL Dim Plage As Range Dim Extension$, FichierImage$
Extension = "JPG" FichierImage = "d:Test_JPG.jpg" 'par exemple Set Plage = ActiveSheet.UsedRange Application.ScreenUpdating = False Workbooks.Add Plage.CopyPicture ActiveSheet.Paste With ActiveSheet.ChartObjects.Add(0, 0, _ Selection.Width, Selection.Height).Chart .Paste .Export FichierImage, Extension End With ActiveWorkbook.Close False
End Sub
(le code est à recopier dans un module standard du classeur dont la ou les feuilles sont à exporter en images).
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
BONJOUR JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU FORMAT JPG. ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
QUELQU UN A UNE SOLUTION ????
Bonjour,
Une solution classique (ici empruntée à LL), qui fonctionne aussi pour créer des
.gif (plus petits semble-t-il que les .jpg) :
Sub ExportRangeAsImage()
'd'après LL
Dim Plage As Range
Dim Extension$, FichierImage$
Extension = "JPG"
FichierImage = "d:Test_JPG.jpg" 'par exemple
Set Plage = ActiveSheet.UsedRange
Application.ScreenUpdating = False
Workbooks.Add
Plage.CopyPicture
ActiveSheet.Paste
With ActiveSheet.ChartObjects.Add(0, 0, _
Selection.Width, Selection.Height).Chart
.Paste
.Export FichierImage, Extension
End With
ActiveWorkbook.Close False
End Sub
(le code est à recopier dans un module standard du classeur dont la ou les
feuilles sont à exporter en images).
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
BONJOUR
JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU
FORMAT JPG.
ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION
PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN
PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE
AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU
GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
Une solution classique (ici empruntée à LL), qui fonctionne aussi pour créer des .gif (plus petits semble-t-il que les .jpg) :
Sub ExportRangeAsImage() 'd'après LL Dim Plage As Range Dim Extension$, FichierImage$
Extension = "JPG" FichierImage = "d:Test_JPG.jpg" 'par exemple Set Plage = ActiveSheet.UsedRange Application.ScreenUpdating = False Workbooks.Add Plage.CopyPicture ActiveSheet.Paste With ActiveSheet.ChartObjects.Add(0, 0, _ Selection.Width, Selection.Height).Chart .Paste .Export FichierImage, Extension End With ActiveWorkbook.Close False
End Sub
(le code est à recopier dans un module standard du classeur dont la ou les feuilles sont à exporter en images).
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
BONJOUR JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU FORMAT JPG. ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
QUELQU UN A UNE SOLUTION ????
Pierre CFI [mvp]
bonjour (évite les maj çà fait mal aux yeux) copie de la réponse de Sylvie, il y a peu ********************* Bonjour, Michel t'a proposé une solution VBA. Sans macro, il faut procéder la façon suivante : 1) sélectionner les cellules excel à transformer en image 2) maintenir la touche majuscule appuyée et cliquer sur Edition 3) choisir Copier une image, 4) choisir une option (écran ou impression), 5) répondre ok, 6) cliquer sur coller fait apparaître l'image du tableau excel *************
-- Pierre CFI MVP Microsoft Access "JFL" a écrit dans le message de news: 041e01c3d84a$e725cea0$
BONJOUR JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU FORMAT JPG. ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
QUELQU UN A UNE SOLUTION ????
bonjour (évite les maj çà fait mal aux yeux)
copie de la réponse de Sylvie, il y a peu
*********************
Bonjour,
Michel t'a proposé une solution VBA.
Sans macro, il faut procéder la façon suivante :
1) sélectionner les cellules excel à transformer en image
2) maintenir la touche majuscule appuyée et cliquer sur
Edition
3) choisir Copier une image,
4) choisir une option (écran ou impression),
5) répondre ok,
6) cliquer sur coller fait apparaître l'image du tableau
excel
*************
--
Pierre CFI
MVP Microsoft Access
"JFL" <socrate@free.fr> a écrit dans le message de news: 041e01c3d84a$e725cea0$a501280a@phx.gbl...
BONJOUR
JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU
FORMAT JPG.
ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION
PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN
PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE
AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU
GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
bonjour (évite les maj çà fait mal aux yeux) copie de la réponse de Sylvie, il y a peu ********************* Bonjour, Michel t'a proposé une solution VBA. Sans macro, il faut procéder la façon suivante : 1) sélectionner les cellules excel à transformer en image 2) maintenir la touche majuscule appuyée et cliquer sur Edition 3) choisir Copier une image, 4) choisir une option (écran ou impression), 5) répondre ok, 6) cliquer sur coller fait apparaître l'image du tableau excel *************
-- Pierre CFI MVP Microsoft Access "JFL" a écrit dans le message de news: 041e01c3d84a$e725cea0$
BONJOUR JE SOUHAITE ENREGISTRER UNE FEUILLE EXCEL AU FORMAT JPG. ACTUELLEMENT JE PASSE PAR UNE PREVISUALISATION PUIS UNE COPIE D ECRAN PUIS UN COLLER DANS UN PROGRAMME DE DESSEIN PUIS APRES RECADRAGE JE SAUVEGARDE AU FORMAT JPG.... MON BUT EST DE TROUVER UN PLUGIN DU GENRE ACROBAT POUR FAIRE IMPRIMER VERS UN FICHIER JPG
QUELQU UN A UNE SOLUTION ????
Ricky [MVP]
Bonjour *Pierre CFI [mvp]* (et tous les lecteurs)
C'est ce que je voulais répondre au moment de voir que... c'est exactement ce que JFL faisait et qu'il voudrait améliorer ;)
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Ricky [MVP]" <ricky@la_niche.be> a écrit dans le message de news: eY9d1iF2DHA.2700@TK2MSFTNGP11.phx.gbl...
Bonjour *Pierre CFI [mvp]* (et tous les lecteurs)
C'est ce que je voulais répondre au moment de voir que... c'est exactement ce que JFL faisait et qu'il voudrait améliorer ;)
