OL2002 : Mise à jour des éléments existants afin d'utiliser un nouveau formulaire personnalisé

Cet article présente les procédures à suivre pour mettre à jour des éléments dans un dossier Outlook pour qu'ils s'ouvrent à l'aide d'un formulaire différent que celui auquel ils sont associés.

Dans certaines situations, vous souhaiterez peut-être modifier le formulaire utilisé pour tous les éléments d'un dossier. Par exemple :

• Vous utilisez le formulaire Outlook par défaut pour saisir 10 contacts dans votre dossier Contacts. Vous créez alors un formulaire personnalisé pour les contacts et vous saisissez 10 contacts supplémentaires. Vous voulez que les 10 premiers contacts utilisent le nouveau formulaire personnalisé à l'ouverture.
• Vous créez un formulaire personnalisé pour les contacts et vous saisissez 10 contacts à l'aide de ce formulaire personnalisé. Vous importez alors 100 contacts à partir d'un fichier texte. Les 100 contacts importés utilisent le formulaire par défaut plutôt que le formulaire personnalisé.
• Vous glissez et déplacez des éléments d'un dossier à un autre. Après avoir déplacé les éléments, ils n'utilisent pas de formulaire personnalisé pour l'ouverture, et ce même si un formulaire personnalisé est défini comme formulaire par défaut pour le dossier.

Une propriété de l'élément nommée classe de message détermine le formulaire utilisé par l'élément. Il est impossible de modifier la classe de message d'un élément manuellement. Vous pouvez toutefois écrire un code VBScript ou Visual Basic Automation pour modifier la classe de message pour tous les éléments d'un dossier.

Lors de la création et de la publication d'un formulaire personnalisé, une classe de message est attribuée au formulaire. La classe de message détermine quel formulaire est associé avec un élément. Le format du nom est " IPM. . ", où est le type de formulaire (Contact, Tâche etc.) et est le nom du formulaire personnalisé. Si vous créez un nouveau formulaire de contact nommé Révisé, par exemple, et si vous le publiez vers votre dossier Contacts, la classe de message sera IPM.Contact.Révisé.

REMARQUE : Dans chacune des opérations suivantes, il est essentiel que le nom de la nouvelle classe de message soit saisie exactement comme celui utilisé lors de la publication du formulaire.

Le tableau suivant contient une liste des différents noms utilisés pour des classes de messages :

REMARQUE : Il est impossible de personnaliser et de publier le formulaire Note.

Pour afficher la classe de message pour un élément donné, ajoutez le champ classe de message comme colonne dans l'affichage actuel. La classe de message dans cet affichage est en lecture seule ; vous ne pouvez pas saisir une classe de message différente pour modifier le formulaire manuellement.

Pour ajouter la classe de message à votre affichage, procédez comme suit :

1. Transformez l'affichage en un Tableau comme, par exemple, l'affichage Liste téléphonique dans le dossier Contacts.
2. Cliquez avec le bouton droit de la souris sur l'en-tête de colonne dans l'affichage et cliquez sur Sélecteur de champs dans le menu contextuel.
3. Dans la liste Sélecteur de champs, sélectionnez Tous les champs Contact.
4. Faites glisser le champ Classe de message vers l'en-tête de colonne pour ajouter le champ en tant que colonne.

La modification du champ Classe de message d'éléments existants nécessite l'utilisation de code VBScript à l'intérieur d'un formulaire Outlook ou de code Visual Basic à partir d'un autre programme afin d'automatiser Outlook et de modifier les champs Classe de message.

Pour modifier les champs Classe de message, utilisez l'une des méthodes suivantes.

Méthode n°1 : Téléchargement de l'utilitaire Omsgclas.exe

Téléchargez Omsgclas.exe qui contient un document Word 97/2000/2002 avec une macro qui modifie les classes de message Outlook. Il s'agit du même utilitaire que celui utilisé pour Outlook 97 et Word 97. Cet utilitaire est également valide pour Outlook 2002 et Word 2002. La macro s'exécute automatiquement à l'ouverture du document.

Lors de l'ouverture de Omsgclas.doc, il se peut que le document Word s'ouvre mais que la macro ne s'exécute pas. Pour corriger ce problème, vous devez abaisser le niveau de sécurité des macros dans Word. Dans Word, cliquez sur le menu Outils, pointez sur Macro, puis cliquez sur Sécurité. Modifiez la sécurité vers basse ou moyenne. Ceci permettra à la macro de s'exécuter lors de la prochaine ouverture du fichier.

Pour plus d'informations sur la procédure d'obtention du fichier Omsgclas.exe, cliquez sur le numéro ci-dessous afin d'afficher l'article correspondant dans la Base de connaissances Microsoft :

2ème méthode : Utilisation d'un utilitaire tiers

Il existe d'autres utilitaires tiers permettant d'effectuer la mise à jour des champs Classe de message. Le site Web Slipstick Systems offre une liste de ces utilitaires à l'adresse suivante : Les produits tiers mentionnés dans le présent article sont fabriqués par des vendeurs indépendants de Microsoft ; nous n'accordons aucune garantie, implicite ou autre, concernant le fonctionnement ou la fiabilité de ces produits.

Méthode n°3 : Création d'une routine VBScript

REMARQUE : Cette méthode ne doit être appliquée que si vous ne possédez pas Microsoft Word 97/2000/2002 ou si vous ne pouvez pas vous procurer le fichier Omsgclas.exe.

Microsoft fournit des exemples de programmation à titre d'illustration uniquement, sans garantie expresse ou implicite, y compris - mais de façon non limitative - les garanties implicites de qualité et/ou d'adéquation à un usage particulier. Le présent article suppose que vous maîtrisez le langage de programmation auquel il est fait référence, ainsi que les outils utilisés pour la création et le débogage des procédures. Les techniciens du Support technique de Microsoft peuvent vous expliquer les fonctionnalités d'une procédure particulière mais ils ne peuvent cependant pas modifier les exemples en vue de vous fournir des fonctionnalités supplémentaires ou de créer des procédures répondant à vos besoins spécifiques. Si vous ne maîtrisez que partiellement la programmation, vous pouvez contacter un fournisseur de logiciels agréé Microsoft ou l'assistance téléphonique (payante) de Microsoft au (800) 936-5200. Pour plus d'informations sur les fournisseurs de logiciels agréés Microsoft, veuillez consulter la page suivante sur le Web : Pour plus d'informations sur les options de support technique proposées par Microsoft, veuillez consulter la page suivante sur le Web : Effectuez les procédures ci-dessous pour créer et exécuter une routine VBScript qui modifie tous les éléments d'un dossier vers un formulaire donné. Cet exemple suppose que vous avez publié un nouveau formulaire nommé MonNouveauFormulaire dans le dossier actuel. Si vous utilisez un nom différent pour votre formulaire, modifiez le nom du formulaire dans la troisième ligne de code dans la section " Saisie du code VBScript ".

Vous devez effectuer quatre étapes :

• Créer un nouvel élément pour stocker le code VBScript.
• Saisir le code VBScript et enregistrer le formulaire.
• Publier le formulaire.
• Utiliser le nouveau formulaire.

Création d'un nouvel élément pour stocker le code VBScript

1. Pointez sur Nouveau dans le menu Fichier, puis cliquez sur Message.
2. Dans le menu Outils, pointez sur Formulaires puis cliquez sur Créer ce formulaire pour accéder au mode création du formulaire.

Saisissez le code VBScript et enregistrez le formulaire

1. Dans le menu Formulaires, cliquez sur Afficher code.
2. Dans l'Éditeur de script, tapez le code suivant. Il n'est pas nécessaire de saisir les lignes qui commencent par une apostrophe, car elles correspondent à des commentaires qui sont ignorés lors de l'exécution.

   Sub Item_Open
   
      ' Modifie la ligne suivante vers votre nouvelle classe de message
      NewMC = "IPM.Contact.MonNouveauFormulaire"
   
      Set CurFolder = Application.ActiveExplorer.CurrentFolder
      Set AllItems = CurFolder.Items
      NumItems = CurFolder.Items.Count
   
      ' Balaie tous les éléments du dossier
      For I = 1 to NumItems
   
         Set CurItem = AllItems.Item(I)
   
         ' Test pour vérifier si la classe de message doit être modifiée
         If CurItem.MessageClass <> NewMC Then
   
            ' Modifie la classe de message
            CurItem.MessageClass = NewMC
   
            ' Enregistre l'élément modifié
            CurItem.Save
   
         End If
   
      Next
   
      MsgBox "Terminé"
   
   End Sub

3. Dans le menu Fichier de l'Éditeur de script, cliquez sur Fermer pour revenir au formulaire.

Publication du nouveau formulaire

1. Dans le menu Outils, pointez sur Formulaires, puis cliquez sur Publier le formulaire sous.
2. Dans la liste " Rechercher dans ", sélectionnez Bibliothèque des formulaires personnels. Tapez un nom pour votre nouveau formulaire, tel que " Classes de message " par exemple (sans les parenthèses), et cliquez sur Publier.
3. Dans le menu Fichier, cliquez sur Fermer puis sur Non pour fermer sans enregistrer.

Utilisation du nouveau formulaire

1. Sélectionnez le dossier contenant les contacts que vous souhaitez mettre à jour.
2. Pointez sur Nouveau dans le menu Fichier, puis cliquez sur Formulaire.
3. Dans la liste Regarder dans, sélectionnez Bibliothèque des formulaires personnels, cliquez sur votre nouveau formulaire puis sur Ouvrir.
4. Attendez que le code ait modifié la classe de message pour tous les éléments du dossier sélectionné. En fonction du nombre d'éléments existants, cette procédure peut prendre plusieurs minutes. À la fin de l'exécution du code, un message s'affiche indiquant Terminé.

REMARQUE : Pour modifier par la suite le code VBScript afin de modifier le nom de la classe de message, maintenez la touche MAJ enfoncée lors de l'ouverture de l'élément. Ceci empêche l'exécution du code VBScript et vous permet de passer en mode création, d'apporter des modifications au code VBScript, puis de publier le formulaire à nouveau.

Pour plus d'informations sur les ressources disponibles et les réponses aux questions les plus fréquemment posées à propos des solutions Microsoft Outlook, cliquez sur le numéro ci-dessous pour afficher l'article correspondant dans la Base de connaissances Microsoft :