Como imprimir una hoja de Word - VB-MUNDO

kai · #1 (**permalink**) 27-06-2007, 07:46:53

Hola!

Disculpen,una pregunta.Alguien sabe como puedo imprimir una hoja de un documento de Word.Por ejemplo,tengo un archivo de Word que consta de 10 paginas,como puedo hacerle para imprimir solamente la pagina 5.He utilizado el metodo PrintOut() pero no me funciono.

Gracias.Espero que alguien sepa.

Alella · #2 (**permalink**) 27-06-2007, 12:37:16

Hola, que tal.

Prueba con esto:

Código:

Sub Macro4()
'
' Macro grabada el 27/06/2007 por Alfredo 
'
    ActivePrinter = "\\Servidor\Nombre_Impresora"
    Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="5-5", PageType:= _
        wdPrintAllPages, ManualDuplexPrint:=False, Collate:=True, Background:= _
        True, PrintToFile:=False, PrintZoomColumn:=0, PrintZoomRow:=0, _
        PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub

En este caso sólo imprime la página 5.
Ya nos contarás.

kai · #3 (**permalink**) 27-06-2007, 23:03:26

Hola

Se debe importar alguna biblioteca,lo que pasa es que copie ese codigo pero me marca error en ActivePrinter,me dice que no se ha declarado.

Gracias

Alella · #4 (**permalink**) 28-06-2007, 07:50:46

Hola, que tal.

Incluye la referencia Microsoft Word 11.0 Object library.

Dim W As New Word.Application
Word.ActivePrinter = "\\Servidor\Impresora"
Word.Application....

Ya nos contarás.