Die Eigenschaft SortedRow legt die Spalte fest in dem das Sortierungssymbol angezeigt wird.

Syntax: Objekt.SortedRow = 1 [Long]

Beispiel:

Dim ax As VistaListControl
Set ax = Me!AX_ListHeader.Object

With ax
    .SortedRow = 3
End With

Set ax = Nothing

bzw.:

Me!AX_ListHeader.SortedRow = 3