macro print hand-outs

[lightning]

Ik heb in mijn presentatie een macro gemaakt om hand-outs altijd op dezelfde manier te printen. De macro werkt alleen in de presentatie waarin ik de macro heb gemaakt. Nu had ik graag die macro voor al mijn presentaties gebruikt. Hoe doe ik dat?

 

[Wigi]

Ik heb nog nooit met VBA in Powerpoint gewerkt, maar misschien kan ik een poging wagen als je de huidige code hier even neerzet. Wel code tags gebruiken aub. (Je code hier plakken, dan en direct daarna op het # teken klikken).

Wigi

 

[lightning]

Sub MacroPrintHandOuts()
'
' De macro is opgenomen op 23/04/2007.
'
    With ActivePresentation.PrintOptions
        .RangeType = ppPrintAll
        .NumberOfCopies = 1
        .Collate = msoTrue
        .OutputType = ppPrintOutputThreeSlideHandouts
        .PrintHiddenSlides = msoTrue
        .PrintColorType = ppPrintColor
        .FitToPage = msoFalse
        .FrameSlides = msoTrue
        .HandoutOrder = ppPrintHandoutHorizontalFirst
        .ActivePrinter = "\\printer_kleur"
    End With
    ActivePresentation.PrintOut
End Sub