ComboBox.ColumnCount-Eigenschaft (Access)

Verwenden Sie die Spaltenanzahl-Eigenschaft , um die Anzahl der Spalten anzugeben, die in einem Listenfeld oder im Listenfeldteil eines Kombinationsfelds angezeigt oder an OLE-Objekte in einem Diagrammsteuerelement oder einem ungebundenen Objektrahmen gesendet werden. Ganze Zahl mit Lese-/Schreibzugriff.

Syntax

Ausdruck verwendet werden. ColumnCount

Ausdruck Eine Variable, die ein ComboBox-Objekt darstellt.

Hinweise

Die ColumnCount-Eigenschaft hält eine ganze Zahl zwischen 1 und der maximalen Anzahl von Feldern in der Tabelle, Abfrage oder SQL-Anweisung oder der maximalen Anzahl von Werten in der Werteliste, die in der RowSource-Eigenschaft des Steuerelements angegeben ist.

Bei Tabellenfeldern können Sie diese Eigenschaft auf der Registerkarte "Suchen" im Abschnitt "Feldeigenschaften" der Tabellenentwurfsansicht für Felder festlegen, bei denen die DisplayControl-Eigenschaft auf "Kombinationsfeld" oder "Listenfeld" festgelegt ist.

Wenn Sie z. B. die Spaltenanzahl-Eigenschaft für ein Listenfeld in einem Formular vom Typ "Mitarbeiter " auf "3" festlegen, können in einer Spalte Nachnamen, in einer anderen Spalte Vornamen und in der dritten Spalte die ID-Nummern der Mitarbeiter aufgeführt werden.

Ein Kombinationsfeld oder Listenfeld kann mehrere Spalten haben. Wenn die RowSource-Eigenschaft des Steuerelements den Namen einer Tabelle, Abfrage oder SQL-Anweisung enthält, zeigt ein Kombinationsfeld oder Listenfeld die Felder aus dieser Quelle von links nach rechts bis zu dem durch die ColumnCount-Eigenschaft angegebenen Wert an.

Um eine andere Kombination von Feldern anzuzeigen, erstellen Sie eine neue Abfrage oder eine neue SQL-Anweisung für die RowSourceRowSource-Eigenschaft unter Angabe der gewünschten Felder und der gewünschten Reihenfolge.

Wenn die RowSource-Eigenschaft eine Liste von Werten enthält (die RowSourceType-Eigenschaft ist auf "Value List" festgelegt), werden die Werte in der Reihenfolge, in der sie in der RowSource-Eigenschaft aufgeführt sind, in die Zeilen und Spalten des Kombinationsfelds oder Listenfelds gesetzt. Wenn die RowSource-Eigenschaft beispielsweise die Liste "Red; Grün; Blau; "Gelb" definiert ist und die ColumnCount-Eigenschaft auf "2" festgelegt ist, enthält die erste Zeile des Kombinationsfelds oder der Listenfeldliste "Rot" in der ersten Spalte und "Grün" in der zweiten Spalte. Die zweite Zeile enthält "Blau" in der ersten Spalte und "Gelb" in der zweiten Spalte.

Verwenden Sie die ColumnWidths-Eigenschaft, um die Breite der im Steuerelement angezeigten Spalten festzulegen oder um Spalten auszublenden.

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

Das folgende Beispiel zeigt, wie Sie ein Kombinationsfeld erstellen, das an eine Spalte gebunden ist, während eine andere angezeigt wird. Das Festlegen der ColumnCount-Eigenschaft auf „2“ gibt an, dass das cboDept-Kombinationsfeld die ersten beiden Spalten der Datenquelle anzeigt, die in der RowSource-Eigenschaft angegeben wird. Das Festlegen der BoundColumn-Eigenschaft auf „1“ gibt an, dass der in der ersten Spalte gespeicherte Wert zurückgegeben wird, wenn Sie den Wert des Kombinationsfelds prüfen.

Die ColumnWidths-Eigenschaft gibt die Breite der zwei Spalten an. Wenn Sie die Breite der ersten Spalte auf 0 Zoll festlegen, wird die erste Spalte nicht im Kombinationsfeld angezeigt.

Private Sub cboDept_Enter()
    With cboDept
        .RowSource = "SELECT * FROM tblDepartments ORDER BY Department"
        .ColumnCount = 2
        .BoundColumn = 1
        .ColumnWidths = "0in.;1in."
    End With
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.