请问怎样用word.basic插入页眉页角?

xskyssdt 2001-12-28 06:39:14
以下是录的宏
Variant V = CreateOleObject("Word.Basic");
以后该怎么处理?

Selection.TypeText Text:="jj"
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.TypeText Text:="this si header type"
Selection.ParagraphFormat.Alignment = wdAlignParagraphJustify
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
ActiveWindow.ActivePane.LargeScroll Down:=2
Selection.TypeText Text:=" this is footer"
Selection.TypeParagraph
Selection.TypeText Text:="ssss"
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
...全文
75 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
xskyssdt 2001-12-28
  • 打赏
  • 举报
回复
自己解决了
xskyssdt 2001-12-28
  • 打赏
  • 举报
回复
我也不知道!
三杯倒 2001-12-28
  • 打赏
  • 举报
回复
哥们,如何插入图片呢

13,825

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder相关内容讨论区
社区管理员
  • 基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧