50分求解一个简单的问题？

[powpow]

怎么调用word中的页面设置？（用户的要求）
我用的是activereport做报表，调用word的页面设置可不可以同样的设置打印的页面？
大家一定要帮我！1！！！

[powpow]

我要的是调用word的页面设置对话框，这样可以么？
请问要引用什么库文件？还有word97跟2000一样么？
老大，帮人帮到底吧！！！

[TechnoFantasy]

你可以用Word的宏功能，录制宏，然后将代码拷贝到VB中。
Word2000需要引用 Microsoft Word Object Library 9.0
97好像是Microsoft Word Object Library 8.0

[powpow]

谢了！
我已经找到用 Dialogs(wdDialogFilePrintSetup).Show来调用对话框！
请问引用了 Microsoft Word Object Library 9.0在只装了word97的机子上是不是不能运行！
要在word97和word2000都能运行是不是8。0和9。0都引用了就行了！thanks

[powpow]

我的是word2000没有8。0，只引用9。0可不可以在word97的机子上运行呀！

[Jneu]

With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientPortrait
.TopMargin = CentimetersToPoints(2.54)
.BottomMargin = CentimetersToPoints(2.54)
.LeftMargin = CentimetersToPoints(3.17)
.RightMargin = CentimetersToPoints(3.17)
.Gutter = CentimetersToPoints(0)
.HeaderDistance = CentimetersToPoints(1.5)
.FooterDistance = CentimetersToPoints(1.75)
.PageWidth = CentimetersToPoints(16.2)
.PageHeight = CentimetersToPoints(22.9)
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
.SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False
.DifferentFirstPageHeaderFooter = False
.VerticalAlignment = wdAlignVerticalTop
.SuppressEndnotes = False
.MirrorMargins = False
.TwoPagesOnOne = False
.GutterPos = wdGutterPosLeft
.LayoutMode = wdLayoutModeLineGrid
End With

[Jneu]

可以同样的设置打印的页面
请将问题转到VBA专栏

[hlf]

To:powpow(飞机)　
请问Dialogs(wdDialogFilePrintSetup).Show一句中的wdDialogFilePrintSetup的值是什么呢？

[powpow]

to:hlf()　
就是调用word的菜单命令printsetup
如果是open命令的话，wdDialogFileOpen
我的问题已经在vba专区解决。谢谢Jneu(沧海桑田)