
……
Window mWindowActive //定义活动窗口对象
View mViewActive //定义活动视图对象
Pane mPane //定义当前窗格对象
mWindowActive=app.GetActiveWindow()//获得当前窗口
mPane=mWindowActive.GetActivePane() //获得当前窗格
mViewActive=mPane.GetView() //获得当前视图
mViewActive.SetSeekView(9) //设置页眉视图
font.SetSize(10)
sel.TypeText("XXXXXXXXXXXXXXXXXX有限公司")
para.SetAlignment(1) //居中
sel.TypeParagraph()
font.SetSize(11)
sel.TypeText("计 算 书 专 用 纸")
para.SetAlignment(1) //居中
font.SetSize(10)
mViewActive.SetSeekView(10) //设置页脚视图
sel.TypeText("- ")
fields.Add(sel.GetRange(),COleVariant(short(33)),COleVariant("PAGE "),vFalse1)//增加页码域
sel.TypeText(" -")
para.SetAlignment(1) //居中
mViewActive.SetSeekView(0)//回到正文视图
……
1、首先打开一个需要在正文上添加页眉的Word文档。
2、然后点击Word文档上方“工具栏”中的“插入”按钮。
3、进入“插入”选项卡后点击“页眉和页脚”选项。
4、即可在文档正文上方d出页眉的输入框,在框内输入需要显示的页眉内容。
5、然后在页眉编辑框之外双击鼠标左键退出页眉编辑,即可看到显示效果。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)