如何每页纸紧凑打印8张幻灯片.docx

如何每页纸紧凑打印8张幻灯片PowerPoint自带的以讲义模式打印，每页纸4、6或9张幻灯片，相互的间距过大，浪费纸张且文字过小，不便于阅读。对于4:3的幻灯片，为做到如下效果，可以先把幻灯片保存为PDF格式，（一张幻灯片就是一页PDF，注意，不要用讲义模式），再用Adobe reader设置为Multiple 2 by 4 进行打印便可。曾经广为流传的一个方法是，将所有幻灯片输出为图片，将这些图片全部插入Word中，在Word中设置分成两栏，并通过多次尝试来调整上下左右的页边距以达到2*4的紧凑效果。左右页边距过小会导致图片过大，以至于只能达到2*3的效果，而且每页下面会留有很大的空白；左右页边距过大，所有图片都太小，不便于阅读且浪费纸张。而且输出为图片和把图片插入Word这两个过程，都很耗时并消耗大量系统资源，容易造成无响应。另外，输出为图片时似乎无法为幻灯片加边框，（因为FrameSlides只在PrintOptions和ExportAsFixedFormat时可用，而Export时不可用。如果还有其他方法，还望高手指点）如果在Word中用宏为所有图片加上边框，代码如下Sub Example()Dim MyInlineShape As InlineShapeApplication.ScreenUpdating = FalseFor Each MyInlineShape In ActiveDocument.InlineShapesWith MyInlineShape.Borders .OutsideLineStyle = wdLineStyleThinThickSmallGap .OutsideColorIndex = wdColorAutomatic .OutsideLineWidth = wdLineWidth300pt End WithNext Application.ScreenUpdating = TrueEnd Sub 上面的.OutsideLineStyle，顾名思义，表示边框的线型，可取如下值：NameValueDescriptionwdLineStyleDashDot5A dash followed by a dot.wdLineStyleDashDotDot6A dash followed by two dots.wdLineStyleDashDotStroked20A dash followed by a dot stroke, thus rendering a border similar to a barber pole.wdLineStyleDashLargeGap4A dash followed by a large gap.wdLineStyleDashSmallGap3A dash followed by a small gap.wdLineStyleDot2Dots.wdLineStyleDouble7Double solid lines.wdLineStyleDoubleWavy19Double wavy solid lines.wdLineStyleEmboss3D21The border appears to have a 3-D embossed look.wdLineStyleEngrave3D22The border appears to have a 3-D engraved look.wdLineStyleInset24The border appears to be inset.wdLineStyleNone0No border.wdLineStyleOutset23The border appears to be outset.wdLineStyleSingle1A single solid line.wdLineStyleSingleWavy18A single wavy solid line.wdLineStyleThickThinLargeGap16An internal single thick solid line surrounded by a single thin solid line with a large gap between them.wdLineStyleThickThinMedGap13An internal single thick solid line surrounded by a single thin solid line with a medium gap between them.wdLineStyleThickThinSmallGap10An internal single thick solid line sur