Propiedad OptionButton.ColumnOrder (Access)

Utilice la propiedad ColumnOrder para especificar el orden de las columnas en la vista Hoja de datos. Valor Entero de lectura y escritura.

Sintaxis

expresión. ColumnOrder

Expresión Variable que representa un objeto OptionButton .

Comentarios

[!NOTA] Para establecer o cambiar esta propiedad para una tabla o consulta usando Visual Basic, debe utilizar la colección de Propiedades de una columna. Para obtener más información sobre el uso de la colección Properties , vea Propiedades.

[!NOTA] La propiedad ColumnOrder no está disponible en la vista Diseño.

La propiedad ColumnOrder se aplica a todos los campos en la vista Hoja de datos y a los controles de formularios cuando el formulario está en vista Hoja de datos.

En la vista Hoja de datos, el valor de la propiedad ColumnOrder de un campo se determina por la posición del campo. Por ejemplo, el campo en la columna más a la izquierda en la vista Hoja de datos tiene un valor de la propiedad ColumnOrder de 1, el siguiente campo tiene un valor de 2 y así sucesivamente. Cambiar la propiedad ColumnOrder de un campo, restablece la propiedad para ese campo y todos a la izquierda de su posición original en la vista Hoja de datos.

En otras vistas, el valor de la propiedad es 0, a menos que cambie explícitamente el orden de uno o más campos en la vista Hoja de datos (bien arrastrando los campos a nuevas posiciones o bien cambiando su configuración de la propiedad ColumnOrder ). Los campos a la derecha de la nueva posición del campo movido tendrán un valor de la propiedad de 0 en vistas distintas de la vista Hoja de datos.

El orden de los campos en la vista Hoja de datos no afecta al orden de los campos en la vista Diseño de la tabla o en la vista Formulario.

Ejemplo:

En el ejemplo siguiente se muestran los campos ProductName y QuantityPerUnit en las dos primeras columnas de la vista Hoja de datos del formulario Productos .

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

En el ejemplo siguiente se muestran los campos ProductName y QuantityPerUnit en las dos primeras columnas de la tabla Products de la vista Hoja de datos. Para establecer la propiedad ColumnOrder , en el ejemplo se usa el procedimiento SetFieldProperty . Si el procedimiento se ejecuta con la tabla abierta, los cambios no se mostrarán hasta que se cierre y se vuelva a abrir.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.