Wordの起動時や検索時に表示される「ナビゲーションウィンドウ」の表示/非表示用
※VBA・マクロで閉じる方法が見つからず、自己解決したので掲載
Public Function fWindow_Navigation(Switch As Boolean)
'Switch
'False：ナビゲーションウィンドウを閉じる
'True：ナビゲーションウィンドウを開く
With Application.TaskPanes(wdTaskPaneNav)
If .Visible <> Switch Then
.Visible = Switch
End If
End With
End Function