desactivar opcion de impresión

Pasos a seguir:

1. Diles a tus compañeros que usen el e-mail
2. Desconecta la impresora y tirala a la basura (núnca hacen caso a la
primera) jeje
3. En caso que otros usena la impresora, cobra un dolar por cada impresión
(siempre sale mi visión capitalista)
o sino...
4. Existe un evento llamado BeforePrint, que tiene un argumento Cancel, que
si toma valor True no imprime, es un evento del objeto aplicacion

Private Sub Workbook_BeforePrint(Cancel As Boolean)
MsgBox "Cuide la naturaleza, use el e-mail
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
Cancel=True
End Sub

En ThisWork

"alexito" escribió en el mensaje
news:

Deseo saber como se puede desactivar la opción de impresión en un formato
realizado en una hoja de excel, la idea es de minimizar el gasto de papel
en la oficina y generar la cultura de envio por via e-mail.