关于VB控制Word ,Excle 打印的问题，知道的兄弟进来一下。

Question

两个问题，
Dim wo As New Word.Application
wo.Documents.Open.....
1,如果在程序中用这样的方法，打开一个文件后，可以用代码将改变默认的纸张吗？2,如果是Excel的话，可以再加一条,设定打印的缩放比例吗？
解决后，将加分结贴，已表点点谢谢意。

Answer 1

对象代表页面设置说明。PageSetup 对象包含了文档的所有页面设置属性（左边距、下边距、纸张大小等）。使用 PageSetup 对象
可用 PageSetup 属性返回 PageSetup 对象。下例将活动文档的第一节设为横向并打印该文档。ActiveDocument.Sections(1).PageSetup.Orientation = _
    wdOrientLandscape
ActiveDocument.PrintOut
下列示例设置“Sales.doc”文档的所有边距。With Documents("Sales.doc").PageSetup
    .LeftMargin = InchesToPoints(0.75)
    .RightMargin = InchesToPoints(0.75)
    .TopMargin = InchesToPoints(1.5)
    .BottomMargin = InchesToPoints(1)
End With