Advertisement
Advertisement
| 05.19.2008 at 08:24AM PDT, ID: 23414035 |
|
[x]
Attachment Details
|
||
1: 2: 3: 4: 5: 6: 7: 8: |
Set presiApp = New PowerPoint.Application ' create presentation
Set presi = presiApp.Presentations.Add(msoFalse)
'set print characteristics
presi.PageSetup.NotesOrientation = msoOrientationHorizontal ' this comes through
presi.PrintOptions.PrintColorType = ppPrintPureBlackAndWhite ' next three don't
presi.PrintOptions.FrameSlides = msoTrue
presi.PrintOptions.OutputType = ppPrintOutputFourSlideHandouts
|