ermccarthy
Board Regular
- Joined
- Feb 15, 2002
- Messages
- 224
Ok, I am trying to do a work around. I want a macro that selects an area, I want the macro to change any font that is not the default (black, color index 0) to change it to white (color index 2) so it doesn't show up when it prints. Then at the end of the macro I will change it back all the white fonts to a different color.......Below is the simple macro that I wrote, but doesn't seem to work......perhaps some of you gurus can help me out...
Range("B3:G11").Select
If Selection.Font.ColorIndex <> 0 Then
With Selection.Font
.ColorIndex = 2
End With
End If
End Sub
Now there is one more piece of the puzzle that I am not sure where to even start. Same thing as above, but I want to also change any borders that are not the default color to white also, so they do not show up when printed either.......
PLEASE HELP!!!!!
Range("B3:G11").Select
If Selection.Font.ColorIndex <> 0 Then
With Selection.Font
.ColorIndex = 2
End With
End If
End Sub
Now there is one more piece of the puzzle that I am not sure where to even start. Same thing as above, but I want to also change any borders that are not the default color to white also, so they do not show up when printed either.......
PLEASE HELP!!!!!