miércoles, 7 de noviembre de 2012

Como evitar que impriman un archivo de Excel



Para evitar que impriman un archivo de Excel, entramos en el editor de Visual Basic for Application (presionamos las teclas ALT-F11) y escribimos el siguiente código en el objeto ThisWorkBook:


 Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Cancel = True
    MsgBox "No puede imprimir este libro.", vbInformation
End Sub


Luego cerramos el Visual Basic, y desde el Excel, le damos la orden de imprimir. El archivo nos devuelve el siguiente mensaje:


De esta manera hemos evitado que impriman este archivo.

Espero que este truco les sirva.

Saludos