Bonjour,
Une fois encore j'aurais besoin de votre aide.
J'ai mis le code suivant dans un fichier et ai affecté ce code à une image jpeg.
Sub Imprimer()
With ActiveSheet
.Unprotect "rosabelle"
.PageSetup.BlackAndWhite = True
.PrintPreview
.PageSetup.BlackAndWhite = False
.Protect "rosabelle"
End With
End Sub
Voici mon problème :
A l'impression (en noir et blanc et sans couleur de remplissage) on voit cette image.
Est-il possible de compléter le code pour que l'image n'apparaisse pas quand on imprime la feuille ?
Je vous remercie par avance pour votre coup de pouce.
Bonne soirée à tous
Une fois encore j'aurais besoin de votre aide.
J'ai mis le code suivant dans un fichier et ai affecté ce code à une image jpeg.
Sub Imprimer()
With ActiveSheet
.Unprotect "rosabelle"
.PageSetup.BlackAndWhite = True
.PrintPreview
.PageSetup.BlackAndWhite = False
.Protect "rosabelle"
End With
End Sub
Voici mon problème :
A l'impression (en noir et blanc et sans couleur de remplissage) on voit cette image.
Est-il possible de compléter le code pour que l'image n'apparaisse pas quand on imprime la feuille ?
Je vous remercie par avance pour votre coup de pouce.
Bonne soirée à tous