Objeto AutoFormatRule (Outlook)
Representa una regla de formato utilizada por un objeto View para determinar cómo dar formato a los elementos de Outlook mostrados dentro de esa vista.
Comentarios
Utilice el método Add o el método Insert de la colección AutoFormatRules para crear una nueva regla de formato para los objetos siguientes:
Reglas de formato integradas y personalizadas
Microsoft Outlook dispone de un conjunto de reglas de formato integradas que pueden deshabilitarse, pero que no se pueden eliminar ni cambiar de orden. Las reglas de formato personalizadas, tanto si se definen mediante programación como mediante acciones del usuario, no se pueden mover por encima de o entre las reglas de formato integradas. Utilice la propiedad Standard para determinar si una regla de formato es integrada o personalizada.
Aplicar reglas de formato
Reglas de formato se comprueban y aplican a cada elemento de Outlook, en el orden en que se encuentran dentro de la colección AutoFormatRules. Utilice la propiedad Enabled para activar o desactivar una regla de formato, la propiedad Filter para definir las condiciones que debe cumplir un elemento de Outlook para que se le aplique la regla de formato y la propiedad Font para especificar el formato que debe aplicar la regla de formato.
Ejemplo:
El siguiente de Visual Basic para Aplicaciones (VBA) se enumera la colección AutoFormatRules para el objeto TableView actual, deshabilita cualquier regla de formato personalizada contenida en la colección.
Private Sub DisableCustomAutoFormatRules()
Dim objTableView As TableView
Dim objRule As AutoFormatRule
' Check if the current view is a table view.
If Application.ActiveExplorer.CurrentView.ViewType = olTableView Then
' Obtain a TableView object reference to the current view.
Set objView = Application.ActiveExplorer.CurrentView
' Enumerate the AutoFormatRules collection for
' the table view, disabling any custom formatting
' rule defined for the view.
For Each objRule In objView.AutoFormatRules
If Not objRule.Standard Then
objRule.Enabled = False
End If
Next
' Save and apply the table view.
objView.Save
objView.Apply
End If
End Sub
Propiedades
| Nombre |
|---|
| Aplicación |
| Class |
| Enabled |
| Filter |
| Font |
| Name |
| Parent |
| Session |
| Estándar |
Consulte también
Referencia del modelo de objetos de Outlook
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.