Objeto PrintRanges (PowerPoint)

Una colección de todos los objetos PrintRange de la presentación especificada. Cada objeto PrintRange representa un intervalo de diapositivas consecutivas o páginas que se va a imprimir.

Ejemplo:

Utilice la propiedad Ranges para devolver la colección PrintRanges. El ejemplo siguiente borra todos los intervalos de impresión anteriormente definidos de la colección de la presentación activa.

ActivePresentation.PrintOptions.Ranges.ClearAll

Utilice el método Add para crear un objeto PrintRange y agregarlo a la colección PrintRanges. En el siguiente ejemplo define tres intervalos de impresión que representan la diapositiva 1, las diapositivas 3 a 5 y las diapositivas 8 y 9 de la presentación activa y, a continuación, se imprimen las diapositivas de dichos intervalos.

With ActivePresentation.PrintOptions

    .RangeType = ppPrintSlideRange

    With .Ranges

        .ClearAll

        .Add 1, 1

        .Add 3, 5

        .Add 8, 9

    End With

End With

ActivePresentation.PrintOut

Use Ranges (index), donde index es el número de índice del intervalo de impresión, para devolver un único objeto PrintRange . El ejemplo siguiente muestra un mensaje que indica el primer y último número de diapositiva intervalo de impresión uno de la presentación activa.

With ActivePresentation.PrintOptions.Ranges
    If .Count > 0 Then
        With .Item(1)
            MsgBox "Print range 1 starts on slide " & .Start & _
                " and ends on slide " & .End
        End With
    End If
End With

Consulte también

Referencia del modelo de objetos de PowerPoint

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.