Propriété ComboBox.ColumnOrder (Access)

Utilisez la propriété ColumnOrder pour spécifier l’ordre des colonnes en mode Feuille de données. Entier en lecture/écriture.

Syntaxe

expression. ColumnOrder

Expression Variable qui représente un objet ComboBox .

Remarques

[!REMARQUE] Pour définir ou modifier cette propriété pour une table ou une requête à l'aide de Visual Basic, vous devez utiliser la collection de Propriétés d'une colonne. Pour plus d’informations sur l’utilisation de la collection Properties , consultez Propriétés.

[!REMARQUE] La propriété ColumnOrder n'est pas disponible en mode Création.

La propriété ColumnOrder s'applique à tous les champs en mode feuille de données et aux contrôles de formulaire lorsque celui-ci est en mode feuille de données.

En mode feuille de données, paramètre de la propriété ColumnOrder d'un champ est déterminé par la position. Par exemple, le champ dans la colonne la plus à gauche en mode feuille de données possède un paramètre de la propriété ColumnOrder 1, le champ suivant a la valeur 2 et ainsi de suite. Modification de la propriété ColumnOrder d'un champ réinitialise la propriété pour ce champ et tous les champs à gauche de sa position initiale en mode feuille de données.

Dans les autres modes, le paramètre de propriété est 0, sauf si vous modifiez explicitement l'ordre d'un ou plusieurs champs en mode feuille de données (soit en faisant glisser les champs vers de nouveaux emplacements ou en modifiant les paramètres de leur propriété ColumnOrder ). Les champs à droite de la nouvelle position du champ déplacé aura un paramètre de propriété de 0 dans les affichages de feuille de données.

L'ordre des champs en mode Feuille de données n'affecte pas l'ordre des champs en mode Création de table ou en mode Formulaire.

Exemple

L’exemple suivant affiche les champs ProductName et QuantityPerUnit dans les deux premières colonnes en mode Feuille de données du formulaire Produits .

Forms!Products!ProductName.ColumnOrder = 1 
Forms!Products!QuantityPerUnit.ColumnOrder = 2

L’exemple suivant affiche les champs ProductName et QuantityPerUnit dans les deux premières colonnes de la table Products en mode Feuille de données. Pour définir la propriété ColumnOrder , l’exemple utilise la procédure SetFieldProperty . Si cette procédure est exécutée alors que la table est ouverte, les modifications ne seront pas affichées jusqu'à ce qu'elle est fermée et rouverte.

Public Sub SetColumnOrder() 
 
 Dim dbs As DAO.Database 
 Dim tdf As DAO.TableDef 
 
 Set dbs = CurrentDb 
 Set tdf = dbs!Products 
 
 ' Call the procedure to set the ColumnOrder property. 
 SetFieldProperty tdf!ProductName, "ColumnOrder", dbLong, 2 
 SetFieldProperty tdf!QuantityPerUnit, "ColumnOrder", dbLong, 3 
 
 Set tdf = Nothing 
 Set dbs = Nothing 
 
End Sub 
 
Private Sub SetFieldProperty(ByRef fld As DAO.Field, _ 
 ByVal strPropertyName As String, _ 
 ByVal intPropertyType As Integer, _ 
 ByVal varPropertyValue As Variant) 
 ' Set field property without producing nonrecoverable run-time error. 
 
 Const conErrPropertyNotFound = 3270 
 Dim prp As Property 
 
 ' Turn off error handling. 
 On Error Resume Next 
 
 fld.Properties(strPropertyName) = varPropertyValue 
 
 ' Check for errors in setting the property. 
 If Err <> 0 Then 
 If Err <> conErrPropertyNotFound Then 
 On Error GoTo 0 
 MsgBox "Couldn't set property '" & strPropertyName & _ 
 "' on field '" & fld.Name & "'", vbCritical 
 Else 
 On Error GoTo 0 
 Set prp = fld.CreateProperty(strPropertyName, intPropertyType, _ 
 varPropertyValue) 
 fld.Properties.Append prp 
 End If 
 End If 
 
 Set prp = Nothing 
 
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.