Bonjour à vous,
Je suis entrain de chercher comment je peux cacher du texte se trouvant dans une cellule pour l'impression.
L'objectif est clair que je puisse voir ce aui se trouve dans cette cellule avant et après l'impression.
J'ai tenté avec cette macro mais je tourne en rond.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("B8").Select
With Selection.Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
End With
With Selection.Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
End Sub
Est ce que quelqu'un à une solution ?
Merci
Je suis entrain de chercher comment je peux cacher du texte se trouvant dans une cellule pour l'impression.
L'objectif est clair que je puisse voir ce aui se trouve dans cette cellule avant et après l'impression.
J'ai tenté avec cette macro mais je tourne en rond.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("B8").Select
With Selection.Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
End With
With Selection.Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
End Sub
Est ce que quelqu'un à une solution ?
Merci