ListBox. ColumnOrder-Eigenschaft (Access)ListBox.ColumnOrder property (Access)

Sie können die ColumnOrder-Eigenschaft zum Angeben der Reihenfolge der Spalten in der Datenblattansicht verwenden.You can use the ColumnOrder property to specify the order of the columns in Datasheet view. Ganze Zahl mit Lese-/Schreibzugriff.Read/write Integer.

SyntaxSyntax

Ausdruck. ColumnOrderexpression.ColumnOrder

Ausdruck Eine Variable, die ein ListBox -Objekt darstellt.expression A variable that represents a ListBox object.

HinweiseRemarks

Wenn Sie diese Eigenschaft für eine Tabelle oder Abfrage mit Visual Basic festlegen oder ändern möchten, müssen Sie die Properties-Auflistung einer Spalte verwenden.To set or change this property for a table or query by using Visual Basic, you must use a column's Properties collection. Weitere Informationen zur Verwendung der Properties -Auflistung finden Sie unter Properties.For more information about using the Properties collection, see Properties.

Die ColumnOrder-Eigenschaft ist in der Entwurfsansicht des Formulars nicht verfügbar.The ColumnOrder property isn't available in Design view.

Die ColumnOrder-Eigenschaft gilt für alle Felder in der Datenblattansicht und für Formular-Steuerelemente, wenn sich das Formular in der Datenblattansicht befindet.The ColumnOrder property applies to all fields in Datasheet view and to form controls when the form is in Datasheet view.

In der Datenblattansicht wird die Einstellung der ColumnOrder-Eigenschaft eines Felds durch die Position des Felds bestimmt.In Datasheet view, a field's ColumnOrder property setting is determined by the field's position. So hat z. B. das Feld in der Spalte ganz links in der Datenblattansicht den Wert 1 für die ColumnOrder-Eigenschaft, das nächste Feld hat die Einstellung 2 usw.For example, the field in the leftmost column in Datasheet view has a ColumnOrder property setting of 1, the next field has a setting of 2, and so on. Eine Veränderung der Einstellung der ColumnOrder-Eigenschaft eines Felds setzt die Eigenschaft für dieses Feld sowie für jedes Feld in der Datenblattansicht links von dessen ursprünglicher Position zurück.Changing a field's ColumnOrder property resets the property for that field and every field to the left of its original position in Datasheet view.

In anderen Ansichten ist die Einstellung der Eigenschaft 0, es sei denn, Sie ändern die Reihenfolge eines oder mehrerer Felder in der Datenblattansicht explizit (entweder durch Ziehen der Felder an neue Positionen oder durch Ändern der Einstellungen für die ColumnOrder -Eigenschaft).In other views, the property setting is 0 unless you explicitly change the order of one or more fields in Datasheet view (either by dragging the fields to new positions or by changing their ColumnOrder property settings). Felder rechts neben der neuen Position des verschobenen Felds haben eine Einstellung von Eigenschaften von 0 in anderen Ansichten als der Datenblattansicht.Fields to the right of the moved field's new position will have a property setting of 0 in views other than Datasheet view.

Die Reihenfolge der Felder in der Datenblattansicht hat keine Auswirkungen auf die Reihenfolge der Felder in der Tabellen-Entwurfsansicht oder Formularansicht.The order of the fields in Datasheet view doesn't affect the order of the fields in table Design view or Form view.

Bei einem Listenfeld kann es sich um ein Formularsteuerelement handeln, und Formulare können in der Datenblattansicht angezeigt werden.List box can be a form control, and forms can be displayed in Datasheet view. Diese Eigenschaft steuert, in welcher Spaltenreihenfolge die Elemente des Formulars angezeigt werden, wenn das Formular als Datenblatt angezeigt wird.This property controls what column order the elements of the form are displayed in when the form is displayed as a datasheet.

BeispielExample

Im folgenden Beispiel werden die Felder ProductName und QuantityPerUnit in den ersten beiden Spalten in der Datenblattansicht des Formulars Produkte angezeigt.The following example displays the ProductName and QuantityPerUnit fields in the first two columns in Datasheet view of the Products form.

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

Im folgenden Beispiel werden die Felder ProductName und QuantityPerUnit in den ersten beiden Spalten der Tabelle Products in der Datenblattansicht angezeigt.The following example displays the ProductName and QuantityPerUnit fields in the first two columns of the Products table in Datasheet view. Zum Festlegen der ColumnOrder -Eigenschaft wird im Beispiel die **** setfieldproperty-Prozedur verwendet.To set the ColumnOrder property, the example uses the SetFieldProperty procedure. Wenn dieses Verfahren ausgeführt wird, während die Tabelle geöffnet ist, werden die Änderungen erst angezeigt, wenn Sie geschlossen und erneut geöffnet werden.If this procedure is run while the table is open, changes will not be displayed until it is closed and reopened.

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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.