Méthode Characters.AddFieldEx (Visio)
Remplace le texte représenté par un objet Characters par un nouveau champ de la catégorie, du code, du format, de l’ID de langue et de l’ID de calendrier que vous spécifiez.
Syntaxe
expression. AddFieldEx (Category, Code, Format, LangID, CalendarID)
Expression Variable qui représente un objet Characters .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Catégorie | Obligatoire | VisFieldCategories | Catégorie du nouveau champ. |
| Code | Obligatoire | VisFieldCodes | Code du nouveau champ. |
| Format | Obligatoire | VisFieldFormats | Format du nouveau champ. |
| LangID | Facultatif | Long | Langue à utiliser pour le nouveau champ. |
| CalendarID | Facultatif | Long | Calendrier à utiliser pour le nouveau champ. |
Valeur renvoyée
Aucune
Remarques
Les valeurs constantes pour Category, Code et Format sont déclarées par la bibliothèque de types Visio dans VisFieldCategories, VisFieldCodes et VisFieldFormats respectivement.
L’argument LangID doit être l’un des ID standard utilisés par Windows pour encoder différentes versions de langage. Par exemple, l’ID de langue est &H0409 pour la version américaine de Microsoft Visio. Pour voir une liste des ID de langue possibles, recherchez « VERSIONINFO » dans le Kit de développement Platform SDK de Microsoft sur le site Web MSDN.
L'argument IDCalendrier doit être l'une des valeurs suivantes, qui sont déclarées dans VisCellVals dans la bibliothèque de types de Visio. La valeur par défaut est visCalWestern qui définit le calendrier occidental.
| Constante | Valeur | Description |
|---|---|---|
| visCalWestern | 0 | Occidentale |
| visCalArabicHijri | 1 | Hijri (lunaire arabe) |
| visCalHebrewLunar | 2 | Hébreu (lunaire) |
| visCalChineseTaiwan | 3 | Taiwanais |
| visCalJapaneseEmperor | 4 | Japonais (ère impériale) |
| visCalThaiB bouddhisme | 5 | Bouddhiste thaïlandais |
| visCalKoreanDanki | 6 | Coréen (Danki) |
| visCalSakaEra | 7 | Saka Era |
| visCalTranslitEnglish | 8 | Translittéré en anglais |
| visCalTranslitFrench | 9 | Translittéré en français |
La méthode AddFieldEx revient à sélectionner Champ sous l’onglet Insertion et à insérer l’une des catégories de champ suivantes dans le texte :
Date/Heure
Descriptif du document
Géométrie
Infos sur l'objet
Infos sur la page
Pour ajouter un champ de formule personnalisé, utilisez la méthode AddCustomField ou AddCustomFieldU . Lorsque vous ne passez pas de valeurs (ou de valeurs par défaut) pour les arguments LangID et CalendarID facultatifs, AddFieldEx agit exactement comme AddField.
Exemple
La macro Microsoft Visual Basic pour Applications (VBA) suivante indique comment utiliser la propriété AddFieldEx pour mettre en forme un champ Date dans une forme. Il dessine un rectangle sur la page de dessin, puis insère un champ qui affiche la date actuelle en grec, à l’aide du calendrier occidental.
Public Sub AddFieldEx_Example()
Dim vsoCharacters As Visio.Characters
Dim vsoShape As Visio.Shape
ActiveWindow.DeselectAll
Set vsoShape = Application.ActivePage.DrawRectangle(3, 5, 5, 3)
vsoShape.Text = "Date: "
Set vsoCharacters = vsoShape.Characters
'Set Begin property equal to End property to
'append new text to existing text.
vsoCharacters.Begin = vsoCharacters.End
'Add a field for the current date, in Greek,
'using the Western calendar and the long date format.
vsoCharacters.AddFieldEx visFCatDateTime, visFCodeCurrentDate, visFmtMsoDateLong, 1032, visCalWestern
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.