No hypelinks in print

M

mark1

I've got hyperlinks that happen to be in my print area.
How can I tell excel not to print them. I know you can do
it for command buttons. Is there a way for hyperlinks?
Thanks in advance!!
 
R

Ron de Bruin

Here is a example

1) It will make the font white
2) Print
3) Make the font black again

Sub test1()
'Range with one area
With ActiveSheet
.Range("B10:B14").Font.ColorIndex = 2
.PrintOut
.Range("B10:B14").Font.ColorIndex = 1
End With
End Sub

Sub test2()
'Range with more areas
With ActiveSheet
.Range("A1:A3,B10:B14,C12").Font.ColorIndex = 2
.PrintOut
.Range("A1:A3,B10:B14,C12").Font.ColorIndex = 1
End With
End Sub
 
Top