Control.Column-Eigenschaft (Access)
Verwenden Sie die Column-Eigenschaft , um auf eine bestimmte Spalte oder Spalten- und Zeilenkombination in einem mehrspaltigen Kombinationsfeld oder Listenfeld zu verweisen. Schreibgeschützter Variant-Wert.
Syntax
Ausdruck. Spalte (Index, Zeile)
Ausdruck Eine Variable, die ein Control-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Index | Erforderlich | Long | Eine lange ganze Zahl, die zwischen 0 und der Einstellung der ColumnCount-Eigenschaft minus 1 liegen kann. |
Row | Optional | Variant | Eine ganze Zahl, die zwischen 0 und der Einstellung der ListCount-Eigenschaft minus 1 liegen kann. |
Hinweise
Use 0 to refer to the first column, 1 to refer to the second column, and so on. Use 0 to refer to the first row, 1 to refer to the second row, and so on. For example, in a list box containing a column of customer IDs and a column of customer names, you could refer to the customer name in the second column and fifth row as:
Forms!Contacts!Customers.Column(1, 4)
Verwenden Sie die Column-Eigenschaft , um den Inhalt eines Kombinationsfelds oder Listenfelds einem anderen Steuerelement zuzuweisen, z. B. einem Textfeld. Um beispielsweise die ControlSource-Eigenschaft eines Textfelds auf den Wert in der zweiten Spalte eines Listenfelds festzulegen, können Sie den folgenden Ausdruck verwenden.
=Forms!Customers!CompanyName.Column(1)
Wenn der Benutzer keine Auswahl getroffen hat, wenn Sie auf eine Spalte in einem Kombinations- oder Listenfeld verweisen, ist die Eigenschaft Column demzufolge Null. Verwenden Sie die IsNull-Funktion , um zu ermitteln, ob eine Auswahl vorgenommen wurde, wie im folgenden Beispiel gezeigt.
If IsNull(Forms!Customers!Country)
Then MsgBox "No selection."
End If
Hinweis
Sie können die Eigenschaftseinstellung ColumnCount überprüfen, um zu bestimmen, über wie viele Spalten ein Kombinations- oder Listenfeld verfügt.
Beispiel
Im folgenden Beispiel werden die Eigenschaften Column und ColumnCount verwendet, um die Werte einer Listenfeldauswahl zu drucken.
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
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.