Bonjour à tous,
Apres de multiples recherches, je m’adresse à ce forum dans l’espoir de trouver une solution..
Je souhaite mettre une image en arrière plan c'est-à-dire derrière les cellules (pour que l’on puisse voir ce qu’il y a écrit dedans). J’aimerais que l’image soit comme un filigrane enfaite, cela pour rendre un peu plus joli un bon de livraison.
Au début, j’ai essayé de passer par l’en tête et le pied de page, d’insérer mon image et de la mettre en filigrane mais cette image se retrouve devant mes cellules dès que j’imprime et me cache donc tout.
En recherchant un peu sur la toile j’ai compris que mon souhait était possible en passant par exemple par une macro (je crois bien que c’est la meilleure solution mais je ne sais pas utiliser les macros et en me documentant un peu je ne comprends toujours pas…) :
par exemple ce code ci :
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
ActiveWindow.SelectedSheets.PrintPreview
ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Delete
End Sub
Mais je ne sais pas l’installer…
J’ai encore trouvé d’autres techniques comme mettre en fon d’écran puis copier mes cellule en tant qu’image avec un remplissage transparent sur ma photo, mais a ce moment la je ne peux plus travailler avec mes cellules…
Donc si quelqu’un aurait une manipulation facile à faire ou m’expliquer une manipulation complexe ce serait très aimable…
Je travaille sur les versions 2007 ou 2010
Merci d’avance
Ps : je joins l’image que je souhaite mettre en fond d’écran et mon bon de livraison qui se trouve sur la feuille 2
Apres de multiples recherches, je m’adresse à ce forum dans l’espoir de trouver une solution..
Je souhaite mettre une image en arrière plan c'est-à-dire derrière les cellules (pour que l’on puisse voir ce qu’il y a écrit dedans). J’aimerais que l’image soit comme un filigrane enfaite, cela pour rendre un peu plus joli un bon de livraison.
Au début, j’ai essayé de passer par l’en tête et le pied de page, d’insérer mon image et de la mettre en filigrane mais cette image se retrouve devant mes cellules dès que j’imprime et me cache donc tout.
En recherchant un peu sur la toile j’ai compris que mon souhait était possible en passant par exemple par une macro (je crois bien que c’est la meilleure solution mais je ne sais pas utiliser les macros et en me documentant un peu je ne comprends toujours pas…) :
par exemple ce code ci :
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
ActiveWindow.SelectedSheets.PrintPreview
ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Delete
End Sub
Mais je ne sais pas l’installer…
J’ai encore trouvé d’autres techniques comme mettre en fon d’écran puis copier mes cellule en tant qu’image avec un remplissage transparent sur ma photo, mais a ce moment la je ne peux plus travailler avec mes cellules…
Donc si quelqu’un aurait une manipulation facile à faire ou m’expliquer une manipulation complexe ce serait très aimable…
Je travaille sur les versions 2007 ou 2010
Merci d’avance
Ps : je joins l’image que je souhaite mettre en fond d’écran et mon bon de livraison qui se trouve sur la feuille 2
