社区
VB基础类
帖子详情
50分求解一个简单的问题?
powpow
2001-11-29 10:19:21
怎么调用word中的页面设置?(用户的要求)
我用的是activereport做报表,调用word的页面设置可不可以同样的设置打印的页面?
大家一定要帮我!1!!!
...全文
92
8
打赏
收藏
50分求解一个简单的问题?
怎么调用word中的页面设置?(用户的要求) 我用的是activereport做报表,调用word的页面设置可不可以同样的设置打印的页面? 大家一定要帮我!1!!!
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
8 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
powpow
2001-11-30
打赏
举报
回复
to:hlf()
就是调用word的菜单命令printsetup
如果是open命令的话,wdDialogFileOpen
我的问题已经在vba专区解决。谢谢Jneu(沧海桑田)
hlf
2001-11-29
打赏
举报
回复
To:powpow(飞机)
请问Dialogs(wdDialogFilePrintSetup).Show一句中的wdDialogFilePrintSetup的值是什么呢?
Jneu
2001-11-29
打赏
举报
回复
可以同样的设置打印的页面
请将问题转到VBA专栏
Jneu
2001-11-29
打赏
举报
回复
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
powpow
2001-11-29
打赏
举报
回复
我的是word2000没有8。0,只引用9。0可不可以在word97的机子上运行呀!
powpow
2001-11-29
打赏
举报
回复
谢了!
我已经找到用 Dialogs(wdDialogFilePrintSetup).Show来调用对话框!
请问引用了 Microsoft Word Object Library 9.0在只装了word97的机子上是不是不能运行!
要在word97和word2000都能运行是不是8。0和9。0都引用了就行了!thanks
TechnoFantasy
2001-11-29
打赏
举报
回复
你可以用Word的宏功能,录制宏,然后将代码拷贝到VB中。
Word2000需要引用 Microsoft Word Object Library 9.0
97好像是Microsoft Word Object Library 8.0
powpow
2001-11-29
打赏
举报
回复
我要的是调用word的页面设置对话框,这样可以么?
请问要引用什么库文件?还有word97跟2000一样么?
老大,帮人帮到底吧!!!
Python 入门到进阶:实战项目清单.doc
Python 入门到进阶:实战项目清单.doc
区块链去中心化存储与 Filecoin 实战.doc
区块链去中心化存储与 Filecoin 实战.doc
Elliptic fitting of molten steel
Elliptic fitting of molten steel
北京航空航天大学考研991数据结构与C语言程序设计部
分
代码实现与真题练习项目_数据结构算法实现_C语言编程练习_历年真题解析_考研复习资料_代码示例库_学习笔记整理_面向北航考研学.zip
北京航空航天大学考研991数据结构与C语言程序设计部
分
代码实现与真题练习项目_数据结构算法实现_C语言编程练习_历年真题解析_考研复习资料_代码示例库_学习笔记整理_面向北航考研学.zip
基于OpenVINO和OpenCV的SqueezeNet图像
分
类模型性能对比
分
析项目_深度学习模型推理优化与跨平台部署效率测试_通过比较OpenVINO推理引擎与OpenCV直接加.zip
基于OpenVINO和OpenCV的SqueezeNet图像
分
类模型性能对比
分
析项目_深度学习模型推理优化与跨平台部署效率测试_通过比较OpenVINO推理引擎与OpenCV直接加.zip
VB基础类
7,785
社区成员
197,585
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章