Bonjour,
Lass=E9 de copier mes tableaux Excel sous Powerpoint (+ Pbm=20
format & mise en page), je souhaite mettre un fonds page=20
(couleur + Logo) derr=E9i=E8re mes tableaux sous Excel.
J'ai bien trouv=E9 la macro=20
(http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT =EAtre pr=E9alablement d=E9finie
Dim ZoneImpr As Range
Set ZoneImpr =3D Range(ActiveSheet.PageSetup.PrintArea)
ZoneImpr.CopyPicture xlScreen, xlBitmap
ActiveSheet.Paste Destination:=3DZoneImpr
Mais je ne vois pas o=F9 mettre l'image que je veux... Et=20
puis =E7a m'ouvre l'aper=E7u avant impression dont j'ai pas=20
besoin... Ma formation Excel remontant =E0 Mahtusalem (et=20
encore il est jeune...), je suis pas tr=E8s dou=E9 avec VBA.
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
Philippe.R
Bonsoir Marco, Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par Menu / Format / Feuille / Arrière plan La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le fichier. Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Marco" a écrit dans le message de news:0f8301c35813$8e370820$ Bonjour, Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm format & mise en page), je souhaite mettre un fonds page (couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro (http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea) ZoneImpr.CopyPicture xlScreen, xlBitmap ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et puis ça m'ouvre l'aperçu avant impression dont j'ai pas besoin... Ma formation Excel remontant à Mahtusalem (et encore il est jeune...), je suis pas très doué avec VBA.
Merci de votre aide...
Bonsoir Marco,
Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par
Menu / Format / Feuille / Arrière plan
La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le
fichier.
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"Marco" <Nospam@merci.com> a écrit dans le message de news:0f8301c35813$8e370820$a101280a@phx.gbl...
Bonjour,
Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm
format & mise en page), je souhaite mettre un fonds page
(couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro
(http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie
Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea)
ZoneImpr.CopyPicture xlScreen, xlBitmap
ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et
puis ça m'ouvre l'aperçu avant impression dont j'ai pas
besoin... Ma formation Excel remontant à Mahtusalem (et
encore il est jeune...), je suis pas très doué avec VBA.
Bonsoir Marco, Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par Menu / Format / Feuille / Arrière plan La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le fichier. Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Marco" a écrit dans le message de news:0f8301c35813$8e370820$ Bonjour, Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm format & mise en page), je souhaite mettre un fonds page (couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro (http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea) ZoneImpr.CopyPicture xlScreen, xlBitmap ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et puis ça m'ouvre l'aperçu avant impression dont j'ai pas besoin... Ma formation Excel remontant à Mahtusalem (et encore il est jeune...), je suis pas très doué avec VBA.
Merci de votre aide...
sabatier
et si tu ne veux pas de l'aperçu avant impression, marco, tu supprimes le Preview pour ne garder que le Print... jps (qui pense, au contraire, qu'avec un prénom comme celui-ci, tu devrais être doué en VBA, à condition de remettre tes procs dans le bon ordre)
Philippe.R a écrit:
Bonsoir Marco, Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par Menu / Format / Feuille / Arrière plan La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le fichier. Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Marco" a écrit dans le message de news:0f8301c35813$8e370820$ Bonjour, Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm format & mise en page), je souhaite mettre un fonds page (couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro (http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea) ZoneImpr.CopyPicture xlScreen, xlBitmap ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et puis ça m'ouvre l'aperçu avant impression dont j'ai pas besoin... Ma formation Excel remontant à Mahtusalem (et encore il est jeune...), je suis pas très doué avec VBA.
Merci de votre aide...
et si tu ne veux pas de l'aperçu avant impression, marco, tu supprimes
le Preview pour ne garder que le Print...
jps (qui pense, au contraire, qu'avec un prénom comme celui-ci, tu
devrais être doué en VBA, à condition de remettre tes procs dans le bon
ordre)
Philippe.R a écrit:
Bonsoir Marco,
Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par
Menu / Format / Feuille / Arrière plan
La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le
fichier.
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"Marco" <Nospam@merci.com> a écrit dans le message de news:0f8301c35813$8e370820$a101280a@phx.gbl...
Bonjour,
Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm
format & mise en page), je souhaite mettre un fonds page
(couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro
(http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie
Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea)
ZoneImpr.CopyPicture xlScreen, xlBitmap
ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et
puis ça m'ouvre l'aperçu avant impression dont j'ai pas
besoin... Ma formation Excel remontant à Mahtusalem (et
encore il est jeune...), je suis pas très doué avec VBA.
et si tu ne veux pas de l'aperçu avant impression, marco, tu supprimes le Preview pour ne garder que le Print... jps (qui pense, au contraire, qu'avec un prénom comme celui-ci, tu devrais être doué en VBA, à condition de remettre tes procs dans le bon ordre)
Philippe.R a écrit:
Bonsoir Marco, Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par Menu / Format / Feuille / Arrière plan La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le fichier. Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Marco" a écrit dans le message de news:0f8301c35813$8e370820$ Bonjour, Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm format & mise en page), je souhaite mettre un fonds page (couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro (http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea) ZoneImpr.CopyPicture xlScreen, xlBitmap ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et puis ça m'ouvre l'aperçu avant impression dont j'ai pas besoin... Ma formation Excel remontant à Mahtusalem (et encore il est jeune...), je suis pas très doué avec VBA.
Merci de votre aide...
Marco
Merci pour les conseils, j'arrive bien à mettre mon fonds de page & à l'imprimer... ...Mais je crois que powerpoint sera encore un passage obligé, pbm de taille d'image, impression différente de ce qu'on a à l'écran... Tant pis pour moi !
-----Message d'origine----- Bonsoir Marco, Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par
Menu / Format / Feuille / Arrière plan La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le
fichier. Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Marco" a écrit dans le message de news:0f8301c35813$8e370820$
Bonjour, Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm format & mise en page), je souhaite mettre un fonds page (couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro (http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea) ZoneImpr.CopyPicture xlScreen, xlBitmap ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et puis ça m'ouvre l'aperçu avant impression dont j'ai pas besoin... Ma formation Excel remontant à Mahtusalem (et encore il est jeune...), je suis pas très doué avec VBA.
Merci de votre aide...
.
Merci pour les conseils, j'arrive bien à mettre mon fonds
de page & à l'imprimer...
...Mais je crois que powerpoint sera encore un passage
obligé, pbm de taille d'image, impression différente de ce
qu'on a à l'écran...
Tant pis pour moi !
-----Message d'origine-----
Bonsoir Marco,
Pour mettre en place l'image de fonds, nul besoin de
macro à priori ; tu l'obtiendras par
Menu / Format / Feuille / Arrière plan
La macro est en revanche indispensable si tu veux
imprimer cet arrière plan en même temps que le
fichier.
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"Marco" <Nospam@merci.com> a écrit dans le message de
news:0f8301c35813$8e370820$a101280a@phx.gbl...
Bonjour,
Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm
format & mise en page), je souhaite mettre un fonds page
(couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro
(http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie
Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea)
ZoneImpr.CopyPicture xlScreen, xlBitmap
ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et
puis ça m'ouvre l'aperçu avant impression dont j'ai pas
besoin... Ma formation Excel remontant à Mahtusalem (et
encore il est jeune...), je suis pas très doué avec VBA.
Merci pour les conseils, j'arrive bien à mettre mon fonds de page & à l'imprimer... ...Mais je crois que powerpoint sera encore un passage obligé, pbm de taille d'image, impression différente de ce qu'on a à l'écran... Tant pis pour moi !
-----Message d'origine----- Bonsoir Marco, Pour mettre en place l'image de fonds, nul besoin de macro à priori ; tu l'obtiendras par
Menu / Format / Feuille / Arrière plan La macro est en revanche indispensable si tu veux imprimer cet arrière plan en même temps que le
fichier. Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Marco" a écrit dans le message de news:0f8301c35813$8e370820$
Bonjour, Lassé de copier mes tableaux Excel sous Powerpoint (+ Pbm format & mise en page), je souhaite mettre un fonds page (couleur + Logo) derréière mes tableaux sous Excel.
J'ai bien trouvé la macro (http://www.excelabo.net/xl/imprimer.htm#filigrane):
Sub ImpFiligrane()
'La Zone d'impression DOIT être préalablement définie Dim ZoneImpr As Range
Set ZoneImpr = Range(ActiveSheet.PageSetup.PrintArea) ZoneImpr.CopyPicture xlScreen, xlBitmap ActiveSheet.Paste Destination:=ZoneImpr
Mais je ne vois pas où mettre l'image que je veux... Et puis ça m'ouvre l'aperçu avant impression dont j'ai pas besoin... Ma formation Excel remontant à Mahtusalem (et encore il est jeune...), je suis pas très doué avec VBA.
