Form.CommandEnabled イベント (Access)

指定した Microsoft Office Web コンポーネントが、指定したコマンドが有効かどうかを判断したときに発生します。

構文

CommandEnabled (コマンド有効)

expressionForm オブジェクトを表す変数です。

パラメーター

名前 必須 / オプション データ型 説明
コマンド 必須 バリアント型 (Variant) 有効になることが確認されているコマンドを指定します。
Enabled 必須 オブジェクト型 (Object) このオブジェクトの Value プロパテイに False を設定すると、コマンドは無効になります。

戻り値

なし

解説

OCCommandIdChartCommandIdEnumPivotCommandId の各定数には、Microsoft Office Web コンポーネントごとにサポートされているコマンドの一覧が含まれています。

次の例では、CommandEnabled イベントをトラップするサブルーチンの構文を示します。

Private Sub Form_CommandEnabled( _ 
 ByVal Command As Variant, ByVal Enabled As Object) Dim intResponse As Integer 
 Dim strPrompt As String 
 
 strPrompt = "Disable the command?" 
 
 intResponse = MsgBox(strPrompt, vbYesNo) 
 
 If intResponse = vbYes Then 
 Enabled.Value = False 
 Else 
 Enabled.Value = True 
 End If 
End Sub

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

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