首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

VFP+WORD: 怎么判断文档是否插入了页码及页码的样式

2012-03-22 
VFP+WORD: 如何判断文档是否插入了页码及页码的样式VFP+WORD: 如何判断文档是否插入了页码及页码的样式最

VFP+WORD: 如何判断文档是否插入了页码及页码的样式
VFP+WORD: 如何判断文档是否插入了页码及页码的样式
最后面是我插入页码(居中、小写字母、位置在页码、首码显示)时产生的代码
其中最令我不解的是我插入页码在页脚,为什么代码中有Header(1)字样?Header不是页眉么?和它有什么关系?

我的核心问题是:
1.为什么会有Header(1)
2.求代码用“?命令”显示出一个文档中的页码设置情况(包括是否有插入页码,是在眉还是脚,是数字或什么其它类型,居中居左还是居右等)
可以设文档对象变量为wole
Sub Macro7()
'
' Macro7 Macro
' 宏在 2011-2-25 由 微软用户 录制
'
  With Selection.Sections(1).Headers(1).PageNumbers
  .NumberStyle = wdPageNumberStyleLowercaseLetter
  .HeadingLevelForChapter = 0
  .IncludeChapterNumber = False
  .ChapterPageSeparator = wdSeparatorHyphen
  .RestartNumberingAtSection = False
  .StartingNumber = 0
  End With
  Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _
  wdAlignPageNumberCenter, FirstPage:=True
End Sub

[解决办法]

引用Headers 属性
参阅参阅参阅参阅返回 HeadersFooters 集合,该集合代表了指定节的页眉。只读。

有关返回集合中单个成员的内容,请参阅返回集合中的对象。

说明
若要返回代表了指定节的页脚的 HeadersFooters 集合,可使用 Footers 属性。

示例
本示例为活动文档中除首页之外的每页添加居中的页码(为首页创建一个独立的页眉)。

With ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary)
.PageNumbers.Add _
PageNumberAlignment:=wdAlignPageNumberCenter, _
FirstPage:=False
End With

本示例将向活动文档首页页眉添加文本。

ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage)
.Range.InsertAfter("First Page Text")
.Range.Paragraphs.Alignment = wdAlignParagraphRight
End With


[解决办法]
引用WdHeaderFooterIndex

常量 值
wdHeaderFooterEvenPages 3
wdHeaderFooterFirstPage 2
wdHeaderFooterPrimary 1


[解决办法]
用 Headers(index) 或 Footers(index) 可返回单个的 HeaderFooter 对象,其中的 index 是 WdHeaderFooterIndex 常量(wdHeaderFooterEvenPages、wdHeaderFooterFirstPage、或 wdHeaderFooterPrimary)之一。下列示例更改活动文档第一节的基本页眉和基本页脚中的文字。

 wdHeaderFooterPrimary = 1

2、
判断
 .NumberStyle 、HeadingLevelForChapter 、IncludeChapterNumber 
中的值即可

热点排行