none
Cómo evitar impresión de documentos en Word 2007.

    Question


  • Hola,

    Deseo saber cómo puedo evitar la impresión de documentos en Word 2007.

    Para evitarlo en Excel uso el siguiente código en el propio documento que quiero mantener sin imprimir y lo protejo mediante clave.

    Private Sub Workbook_BeforePrint(Cancel As Boolean)

      Cancel = True

      MsgBox "Esta hoja no puede imprimirse", vbOKOnly,
    "Error"

    End Sub


    ¿Cómo puedo hacer lo mismo en Word?

    Saludos.
    Sunday, October 26, 2008 1:00 AM

Answers

All replies

  • Hola:

    Puedes hacerlo "anulando" los comandos Imprimir y su acceso directo con unas macros como estas:

     

    Sub FilePrint()
    MsgBox "Este documento no se puede imprimir"
    End Sub
    Sub FilePrintDefault()
    MsgBox "Este documento no se puede imprimir"
    End Sub

     

    Los nombres de las macros tienen que ser exactamente esos porque sino no funcionarán, puesto que se interceptan esos comandos de Word.

    Con eventos también sería posible. Más información:

    http://word.mvps.org/FAQs/MacrosVBA/InterceptSavePrint.htm

    http://word.mvps.org/FAQs/MacrosVBA/AppClassEvents.htm

    Sunday, October 26, 2008 8:15 PM
  • Gracias, funcionó tal como lo necesitaba.

     

    Ahora, otra pregunta,¿cómo evito que se copien los contenidos de un documento?

     

    Saludos.

     

    Thursday, October 30, 2008 3:44 AM
  • Pues con algo así:

    Sub Editcopy()
    MsgBox "No se puede copiar"
    End Sub
    Sub Editcut()
    MsgBox "No se puede copiar"
    End Sub

     

    O más sofisticado y más seguro: http://office.microsoft.com/es-es/word/HA101029183082.aspx o bien convirtiéndolo en pdf con sus correspondientes permisos.

    Thursday, October 30, 2008 1:16 PM
  • Hola muchas gracias por la ayuda!! El documento en word2007 con macros se guarda con extension *.*docm y se eliminan las macros si guardas con extensin *.*docx o *.*doc. Para evitar el ¨guardar como¨ escribi:

    Sub FileSaveas()

    MsgBox "No se puede guardar"
    End Sub

    Y funciona pero como word 2007 despliega opciones a la derecha (como plantilla, 2003, etc), entonces al clicker cualquiera ya es posible guardar una copia del documento, la pregunta es:


    ¿Como puedo bloquear todas las opciones del comando SaveAs?

    Muchisimas gracias por la ayuda.
    Thursday, June 30, 2011 3:31 PM