[...]Deze oplossing werkt perfect, alleen nog een rand vraag kan ik ook refereren naar een andere dia die ik wil afdrukken.
Bedankt voor je compliment.
M.b.t. je vraag: dat kan wel, maar dan moet je weten welke dia (volgnummer) je wilt afdrukken. Verander je dus later je presentatie, moet je ook de macro van je knop aanpassen aan het nieuwe volgnummer.
Voorbeeld van een macro waarbij dia 2 wordt afgedrukt vanuit dia 1 of welke andere dia dan ook:
Sub Macro2()
'
' De macro is opgenomen op 9-8-2006 door Tijs.
'
With ActivePresentation.PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add Start:=2, End:=2
End With
.NumberOfCopies = 1
.Collate = msoTrue
.OutputType = ppPrintOutputSlides
.PrintHiddenSlides = msoTrue
.PrintColorType = ppPrintColor
.FrameSlides = msoFalse
.HandoutOrder = ppPrintHandoutHorizontalFirst
End With
ActivePresentation.PrintOut
End Sub
Het enige wat je voor je eigen doeleinden aan moet passen is:
With .Ranges
.ClearAll
.Add Start:=2, End:=2
End With
Vervang de 2 in Start:= en End:=
door het dianummer dat je wilt laten afdrukken.
Tijs.