Restore cell color after print

[powerman]

hi, i am using excel 2003. i have a form, inside has several cells for key in data, let's say B2, C5 and D2. i fill the cell with yellow color.
i dont want yelllow color to be print out, and after print out the yellow color still remain there.
i try

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cells.Interior.ColorIndex = xlNone
End Sub

but after print, yellow color cannot restore.

thanks for help.

 

[powerman]

sorry, i am zero in visual basic.

"Paste the code to Standard Module" -- you mean need to insert module then paste the code above ?

Run "RunBeforePrint" before print and "RunAfterPrint" -- dont understand, everytime have to come VBE to do ?


could you email me an excel sample, let me take a look? my email address is power_rider@hotmail.com


thanks.

 

[jindon]

1) hit Alt + F11 to open VBE
2) Go To [Insert] - [Module] And Paste the code
3) hit Alt + F11 To get back to Excel
4) Hit Alt + F8 And run "RunBeforePrint"
5) Do whatever you like
6) Hit Alt + F8 and run "RunAfterPrint"

 

[powerman]

when doing step 6, coming out run time errror "438" object does not support this property or method. when press debug, yellow highlight "Sheets(wsName).x.Interior.ColorIndex = 6"

i prefer the one you gave me before, although need to click 2 times after print preview, more confinient. coz other users dont know press alt+f8. :>