Assembly: EDKB12WS (in EDKB12WS.exe)

Syntax

Visual Basic

Private Shared Sub HeaderFooterAnzeigen()

private static System.Void HeaderFooterAnzeigen()

C++

private:
static System::Void HeaderFooterAnzeigen()

JScript

private static function HeaderFooterAnzeigen();

Source code

Visual Basic

Copy Code

Private Sub HeaderFooterAnzeigen()
    If objword.ActiveWindow.View.SplitSpecial <> WdSpecialPane.wdPaneNone Then
        objword.ActiveWindow.Panes.Item(2).Close()
    End If
    If objWord.ActiveWindow.ActivePane.View.Type = WdViewType.wdNormalView Or objWord.ActiveWindow.ActivePane.View.Type = WdViewType.wdOutlineView Then
        objWord.ActiveWindow.ActivePane.View.Type = WdViewType.wdPrintView
    End If
    objWord.ActiveWindow.ActivePane.View.SeekView = WdSeekView.wdSeekCurrentPageHeader
    If objWord.Selection.HeaderFooter.IsHeader = True Then
        objWord.ActiveWindow.ActivePane.View.SeekView = WdSeekView.wdSeekCurrentPageFooter
    Else
        objWord.ActiveWindow.ActivePane.View.SeekView = WdSeekView.wdSeekCurrentPageHeader
    End If
End Sub

Platforms

Windows 8, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows XP SP2 x64 Edition, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

The .NET Framework does not support all versions of every platform. For a list of the supported versions, see System Requirements.

Version Information

.NET Framework

Supported in: 4.5, 4, 3.5, 3.0, 2.0, 1.1, 1.0

.NET Compact Framework

Supported in: 3.5, 2.0, 1.0

XNA Framework

Supported in: 3.0, 2.0, 1.0