Propiedad TextBox.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 TextBox .
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.