Programación General > Visual Basic 6.0 e inferiores

 Imprimir Desde Una Presentación Activa

(1/1)

agfed:
Estoy buscando la forma de imprimir cualquier diapositiva
desde mi presentación hecha en Power Point, y que
esta corriendo y/o ejecutandose. (No en el modo de edición).

Lo único que me ha funcionado parcialmente es una macro,
asociada a un botón.

Pero si la trato de ejecutar en una diapositiva que no sea la primera
me sigue imprimendo la primera solamente y yo quiero que me imprima
la que esta en pantalla.

La macro que logré es la siguiente:

    With ActivePresentation.PrintOptions
        .RangeType = ppPrintCurrent
        .NumberOfCopies = 1
        .Collate = msoTrue
        .OutputType = ppPrintOutputSlides
        .PrintHiddenSlides = msoTrue
        .PrintColorType = ppPrintBlackAndWhite
        .FitToPage = msoFalse
        .FrameSlides = msoFalse
        .ActivePrinter = "HP LaserJet 1100 (MS)"
    End With
    ActivePresentation.PrintOut

Brroz:
Hola agfed.

No estoy seguro pues nunca lo he probado en el caso concreto, pero supongo que el método PrintOut admitirá como uno de sus parámetros (como en otras ocasiones) el número de página/s que quieres imprimir. Especifícalo.

A ver si así. Chao.

agfed:
Si me sirvió tu sugerencia GRACIAS.

Navegación

[0] Índice de Mensajes