Propiedad ComboBox.Column (Access)
Utilice la propiedad Column para hacer referencia a una columna o una combinación de columna y fila específicas en un cuadro combinado de varias columnas o un cuadro de lista. Variant de solo lectura.
Sintaxis
expresión. Columna (índice, fila)
Expresión Variable que representa un objeto ComboBox .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Index | Obligatorio | Long | Número entero largo cuyo valor puede oscilar entre 0 hasta el valor de la propiedad ColumnCount menos uno. |
| Row | Opcional | Variant | Número entero cuyo valor puede oscilar entre 0 hasta el valor de la propiedad ListCount menos 1. |
Comentarios
Use 0 para hacer referencia a la primera columna, 1 para hacer referencia a la segunda columna, etc. Use 0 para hacer referencia a la primera fila, 1 para hacer referencia a la segunda fila, etc. Por ejemplo, en un cuadro de lista que contiene una columna de identificadores de cliente y una columna de nombres de cliente, puede hacer referencia al nombre del cliente en la segunda columna y la quinta fila como:
Forms!Contacts!Customers.Column(1, 4)
Utilice la propiedad Column para asignar el contenido de un cuadro combinado o un cuadro de lista a otro control, como un cuadro de texto. Por ejemplo, para establecer la propiedad ControlSource de un cuadro de texto en el valor de la segunda columna de un cuadro de lista, puede usar la siguiente expresión.
=Forms!Customers!CompanyName.Column(1)
Si el usuario no realizó ninguna selección cuando se hace referencia a una columna de un cuadro combinado o un cuadro de lista, el valor de la propiedad Column será Null. Use la función IsNull para determinar si se ha realizado una selección, como en el ejemplo siguiente.
If IsNull(Forms!Customers!Country)
Then MsgBox "No selection."
End If
Nota:
Para determinar cuántas columnas tiene un cuadro combinado o un cuadro de lista, puede fijarse el valor de la propiedad ColumnCount.
Ejemplo:
En el siguiente ejemplo, se usan la propiedad Column y la propiedad ColumnCount para imprimir los valores de una selección de un cuadro de lista.
Public Sub Read_ListBox()
Dim intNumColumns As Integer
Dim intI As Integer
Dim frmCust As Form
Set frmCust = Forms!frmCustomers
If frmCust!lstCustomerNames.ItemsSelected.Count > 0 Then
' Any selection?
intNumColumns = frmCust!lstCustomerNames.ColumnCount
Debug.Print "The list box contains "; intNumColumns; _
IIf(intNumColumns = 1, " column", " columns"); _
" of data."
Debug.Print "The current selection contains:"
For intI = 0 To intNumColumns - 1
' Print column data.
Debug.Print frmCust!lstCustomerNames.Column(intI)
Next intI
Else
Debug.Print "You haven't selected an entry in the " _
& "list box."
End If
Set frmCust = 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.