Comment : empêcher Outlook d'afficher une zone de formulaire

Article
04/28/2010

Mise à jour : novembre 2007

S'applique à
Les informations de cette rubrique s'appliquent uniquement aux projets Visual Studio Tools pour Office et aux versions de Microsoft Office spécifiés. Type de projet Projets au niveau de l'application Version de Microsoft Office Outlook 2007 Pour plus d'informations, consultez Fonctionnalités disponibles par type d'application et de projet.

Les informations de cette rubrique s'appliquent uniquement aux projets Visual Studio Tools pour Office et aux versions de Microsoft Office spécifiés.

Type de projet

Projets au niveau de l'application

Version de Microsoft Office

Outlook 2007

Pour plus d'informations, consultez Fonctionnalités disponibles par type d'application et de projet.

Dans certains cas, vous ne souhaitez pas que Microsoft Office Outlook affiche une zone de formulaire pour un élément particulier. Par exemple, si un contact ne contient pas d'adresse professionnelle, vous pouvez empêcher l'affichage d'une zone indiquant l'emplacement de l'entreprise sur une carte.

Pour empêcher Outlook d'afficher une zone de formulaire

Ouvrez le fichier de code de la zone de formulaire que vous souhaitez modifier.
Développez la région de code Fabrique de zones de formulaire.
Ajoutez le code au gestionnaire d'événements FormRegionInitializing qui affecte à la propriété Cancel de la classe FormRegionInitializingEventArgs la valeur true.

Dans cet exemple, si l'élément de contact ne contient pas d'adresse, la propriété Cancel a la valeur true et la zone de formulaire n'apparaît pas.

Exemple

Private Sub MapItFactory_FormRegionInitializing(ByVal sender As Object, ByVal e As Microsoft.Office.Tools.Outlook.FormRegionInitializingEventArgs) Handles Me.FormRegionInitializing

    Dim myItem As Outlook.ContactItem = CType(e.OutlookItem, Outlook.ContactItem)

    If Not (myItem Is Nothing) Then
        If Not (myItem.BusinessAddress Is Nothing) AndAlso myItem.BusinessAddress.Trim().Length > 0 Or (Not (myItem.HomeAddress Is Nothing) AndAlso myItem.HomeAddress.Trim().Length > 0) Or (Not (myItem.OtherAddress Is Nothing) AndAlso myItem.OtherAddress.Trim().Length > 0) Then
            Return
        End If
    End If

    e.Cancel = True

End Sub

private void MapItFactory_FormRegionInitializing(object sender,
    Microsoft.Office.Tools.Outlook.FormRegionInitializingEventArgs e)
{
    Outlook.ContactItem myItem = (Outlook.ContactItem)e.OutlookItem;

    if (myItem != null)
    {
        if ((myItem.BusinessAddress != null &&
                myItem.BusinessAddress.Trim().Length > 0) ||
            (myItem.HomeAddress != null && 
                myItem.HomeAddress.Trim().Length > 0) ||
            (myItem.OtherAddress != null && 
                myItem.OtherAddress.Trim().Length > 0))
        {
            return;
        }
    }

    e.Cancel = true;
}