l'image qu'on fait apparaître via Format/Feuille/Arrière-plan n'est que pour le plaisir des yeux du travailleur de force face à son écran : elle n'est pas imprimable => FAUX, solution postée par Denny Campbell le 99-03-04 sur le forum de Microsoft.public.excel.programming
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
bon bien sûr le résultat est à voir
cette solution figurait sur une de mes pages :
<http://xlbysteph.free.fr/aideinformatique/actionimpression.htm>