DataColumns.SetColumnProperties, méthode (Visio)

Définit une ou plusieurs propriétés de colonne de données pour une ou plusieurs colonnes de données.

Remarque

Cet objet ou ce membre Visio est disponible uniquement pour les titulaires d’une licence d’utilisation de Visio Professionnel 2013.

Syntaxe

expression. SetColumnProperties (ColumnNames(), Properties(), Values())

Expression Expression qui renvoie un objet DataColumns .

Parameters

Nom	Requis/Facultatif	Type de données	Description
ColumnNames()	Requis	String	Tableau de chaînes qui représentent des noms de colonnes de données.
Properties()	Obligatoire	Long	Tableau de propriétés de colonne de données, tel que VisDataColumnProperties. Les valeurs possibles, reportez-vous à la section Remarques.
Values()	Requis	Variant	Tableau de valeurs à affecter aux propriétés. Reportez-vous aux notes pour les valeurs possibles.

Valeur renvoyée

Aucune

Remarques

La méthode SetColumnProperties constitue un moyen plus efficace pour définir simultanément des propriétés pour plusieurs colonnes de données au lieu de définir des propriétés pour une colonne à la fois. En fonction des éléments que vous placez dans chacun des trois tableaux de paramètres, vous pouvez modifier plusieurs propriétés de la même colonne de données, ou bien une ou plusieurs propriétés de différentes colonnes de données. Pour chaque modification que vous voulez effectuer, transmettez les triplets nom de colonne/propriété/valeur associés aux positions correspondantes de l'ensemble des trois tableaux. Notez que la taille de l'ensemble de ces trois tableaux que vous transmettez à la méthode doit être la même, sinon, la méthode renvoie une erreur.

Pour le paramètre NomsColonnes(), transmettez un tableau des noms de colonnes de données dont vous voulez modifier les propriétés. Si vous voulez modifier plusieurs propriétés d'une même colonne, vous pouvez soit placer le même nom à plusieurs emplacements dans le tableau, soit placer le nom de colonne à un emplacement du tableau, puis placer des chaînes vides aux autres emplacements correspondant à ceux des propriétés à modifier.

Les valeurs possibles pour les éléments dans le tableau de paramètres Propriétés() sont déclarées dans VisDataColumnProperties et affichées dans le tableau suivant.

Constante	Valeur	Description
visDataColumnPropertyCalendar	3	Calendrier de la propriété de colonne de données.
visDataColumnPropertyCurrency	5	Devise de la propriété de colonne de données.
visDataColumnPropertyDisplayName	6	Nom complet de la propriété de colonne de données dans l'interface utilisateur.
visDataColumnPropertyHyperlink	8	Si la valeur de colonne de données devient un lien hypertexte dans l'interface utilisateur de Visio lorsqu'elle est liée à une forme.
visDataColumnPropertyLangID	2	ID de langue de la propriété de colonne de données.
visDataColumnPropertyType	1	Type de données de la propriété de colonne de données.
visDataColumnPropertyUnits	4	Unités de la propriété de colonne de données.
visDataColumnPropertyVisible	7	Si la propriété de colonne de données est visible dans l'interface utilisateur.

Les valeurs possibles pour les éléments dans le tableau de paramètres Valeurs() dépendent des valeurs de paramètre du tableau Propriétés() correspondantes. Le tableau de la rubrique DataColumn.SetProperty affiche des valeurs de propriété de colonne de données valides pour chaque propriété de colonne de données, en fonction du type de données de colonne de données.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) suivante montre comment définir la valeur d’une propriété unique pour deux colonnes différentes dans le jeu d’enregistrements le plus récemment ajouté dans la collection DataRecordsets du document actif. La macro considère que le dernier jeu d’enregistrements ajouté est celui basé sur les données de la feuille de calcul ORGDATA.xls, livrée avec Visio. Exemple de code pour l’ajout de ce jeu d’enregistrements de données dans la rubrique de méthode DataRecordsets.Add . Cependant, vous pouvez utiliser ce code avec n’importe quel jeu d’enregistrement de données qui possède au moins deux colonnes.

La macro modifie le nom complet de la première colonne en « Dept. » et définit la propriété Hyperlink de la seconde colonne avec la valeur True. Par la suite (si vous avez utilisé ORGDATA comme source de données), l’adresse e-mail des formes liées aux données dans le jeu d’enregistrements de données fera office de lien hypertexte.

Notez que la modification du nom complet d’une colonne de données modifie uniquement sa propriété DisplayName et ne modifie pas le nom de programmation de la colonne, qui est spécifié par sa propriété Name .

 
Public Sub SetColumnProperties_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim intCount As Integer 
     
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    Dim astrColumnNames(1) As String 
    Dim alngProperties(1) As Long 
    Dim avarValues(1) As Variant 
     
    astrColumnNames(0) = vsoDataRecordset.DataColumns(1).DisplayName 
    astrColumnNames(1) = vsoDataRecordset.DataColumns(2).DisplayName 
        
    alngProperties(0) = visDataColumnPropertyDisplayName 
    alngProperties(1) = visDataColumnPropertyHyperlink 
        
    avarValues(0) = "Dept." 
    avarValues(1) = True 
         
    vsoDataRecordset.DataColumns.SetColumnProperties astrColumnNames, alngProperties, avarValues 
 
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.