2,462
社区成员
发帖
与我相关
我的任务
分享如何在VB或VBA中获得word的总页数？注意：不用numpage域的方法。
如何在VB或VBA中获得word的总页数？注意：不用numpage域的方法。
主要是为了判断是否到了文档最后一页。
主要是为了判断是否到了文档最后一页。
...全文
请发表友善的回复…
发表回复
lzqgj 2003-05-17
- 打赏
- 举报
很好，谢谢!你知道获取当前页的代码吗？
cy_nwau 2003-05-17
- 打赏
- 举报
Dim ow As Object
Dim od As Object
Set ow = CreateObject("word.application")
Set od = ow.Documents.Open("c:\aa.doc")
ow.Visible = True
od.BuiltInDocumentProperties (14) 'word的系统常数wdPropertyPages=14
Dim od As Object
Set ow = CreateObject("word.application")
Set od = ow.Documents.Open("c:\aa.doc")
ow.Visible = True
od.BuiltInDocumentProperties (14) 'word的系统常数wdPropertyPages=14
lzqgj 2003-05-17
- 打赏
- 举报
怎么我的问题没有显示，搜索后才出来？
