次の方法で共有


MeetingItem.CustomPropertyChange イベント (Outlook)

アイテム (親オブジェクトのインスタンス) のカスタム プロパティが変更されると発生します。

構文

CustomPropertyChange( _Name_ )

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

パラメーター

名前 必須 / オプション データ型 説明
名前 必須 String 変更されたカスタム プロパティの名前を指定します。

注釈

プロパティ名がプロシージャに渡されるため、どのプロパティが変更されたかを確認できます。

この Microsoft Visual Basic Scripting Edition (VBScript) の例では、 CustomPropertyChange イベントを使用して、 Booleanフィールドが True に設定すると、コントロールを有効にします。

この例では、フォームの 2 ページ目の 2 つのカスタム フィールドを作成します。 1 つ目の ブール値 フィールドの場合は、"RespondBy"の名前です。 2 番目のフィールドは"DateToRespond"という名前です。

Sub Item_CustomPropertyChange(ByVal myPropName) 
 Select Case myPropName 
 Case "RespondBy" 
 Set myPages = Item.GetInspector.ModifiedFormPages 
 Set myCtrl = myPages("P.2").Controls("DateToRespond") 
 If Item.UserProperties("RespondBy").Value Then 
 myCtrl.Enabled = True 
 myCtrl.Backcolor = 65535 'Yellow 
 Else 
 myCtrl.Enabled = False 
 myCtrl.Backcolor = 0 'Black 
 End If 
 Case Else 
 End Select 
End Sub

関連項目

MeetingItem オブジェクト

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

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