Evento ContactItem.CustomPropertyChange (Outlook)
Ocorre quando uma propriedade personalizada de um item (que é uma instância do objeto pai) é alterada.
Sintaxe
expression. CustomPropertyChange( _Name_ )
Expressão Uma variável que representa um objeto ContactItem .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Name | Obrigatório | String | O nome da propriedade personalizada que foi alterada. |
Comentários
O nome da propriedade é passado ao procedimento para que você possa determinar a propriedade personalizada alterada.
Exemplo
Este exemplo do Microsoft Visual Basic Scripting Edition (VBScript) usa o evento CustomPropertyChange para habilitar um controle quando um campo de Boolean é definido como True.
Nesse exemplo, crie dois campos personalizados na segunda página de um formulário. O primeiro, um campo Boolean, é chamado "RespondBy". O segundo campo é chamado "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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.