次の方法で共有

OutlookBarPane.BeforeNavigate イベント (Outlook)

  • [アーティクル]

別のフォルダーに移動するために、ユーザーが [ ショートカット] ウィンドウのショートカットをクリックすると発生します。

構文

expression. BeforeNavigate( _Shortcut_ , _Cancel_ )

式 'OutlookBarPane' オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Shortcut 必須 OutlookBarShortcut ユーザーがクリックしたショートカットです。
Cancel 必須 Boolean False イベントが発生します。 イベント プロシージャでこの引数に True を設定する場合は、現在のフォルダーは変更されません。

注釈

このイベントは Microsoft Visual Basic Scripting Edition (VBScript) では使用できません。

例

この Microsoft Visual Basic for Applications (VBA) の例では、ユーザーが [ショートカット] ウィンドウを使用して Notes フォルダーを開くのを防ぎます。 サンプル コードをクラス モジュールに配置する必要があり、 Microsoft Outlookでは、イベント プロシージャを呼び出すことができます前に、 Initialize_handlerルーチンを呼び出す必要があります。 Notes フォルダーへのショートカットがまだない場合は、この例を実行するために作成する必要があります。

Public WithEvents myOlPane As Outlook.OutlookBarPane 
 
 
 
Public Sub Initialize_handler() 
 
 Set myOlPane = Application.ActiveExplorer.Panes.Item("OutlookBar") 
 
End Sub 
 
 
 
Private Sub myOlPane_BeforeNavigate(ByVal Shortcut As Outlook.OutlookBarShortcut, Cancel As Boolean) 
 
 If Shortcut.Name = "Notes" Then 
 
 MsgBox "You cannot view the Notes folder." 
 
 Cancel = True 
 
 End If 
 
End Sub

関連項目

OutlookBarPane オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。