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
