Word VBA教程:SeekView属性

返回或设置在页面视图中显示的文档元素。WdSeekView,可读写。

WdSeekView 可以是下列 WdSeekView 常量之一:
wdSeekCurrentPageFooter
wdSeekCurrentPageHeader
wdSeekEndnotes
wdSeekEvenPagesFooter
wdSeekEvenPagesHeader
wdSeekFirstPageFooter
wdSeekFirstPageHeader
wdSeekFootnotes
wdSeekMainDocument
wdSeekPrimaryFooter
wdSeekPrimaryHeader

expression.SeekView

expression   必需。该表达式返回一个View对象。

说明

如果当前视图不是页面视图,该属性将产生一个错误。

VBA示例

如果活动文档有脚注,则本示例在页面视图中显示它。


If ActiveDocument.Footnotes.Count >= 1 Then
    With ActiveDocument.ActiveWindow.View
        .Type = wdPrintView
        .SeekView = wdSeekFootnotes
    End With
End If

本示例显示当前节中第一页的页脚。


ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.ActiveWindow.View
    .Type = wdPrintView
    .SeekView = wdSeekFirstPageFooter
End With

如果在页面视图中选定脚注或尾注区域,本示例可切换到主文档。


Set myView = ActiveDocument.ActiveWindow.View
If myView.SeekView = wdSeekFootnotes Or _
    myView.SeekView = wdSeekEndnotes Then
    myView.SeekView = wdSeekMainDocument
End If

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号