Table.Sort-Methode (Outlook)

Sortiert die Zeilen der Tabelle nach der in SortProperty angegebenen Eigenschaft und setzt die aktuelle Zeile auf kurz vor der ersten Zeile in der Tabelle zurück.

Syntax

Ausdruck. Sort (SortProperty, Descending)

Ausdruck Eine Variable, die ein Table-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
SortProperty Erforderlich String Gibt die Eigenschaft zu verwenden, um die Zeilen der Tabelle zu sortieren.
Descending Optional Boolean Ob die Tabelle in absteigender Reihenfolge zu sortieren.

HinwBemerkungeneise

SortProperty kann jede explizite integrierte Eigenschaft oder benutzerdefinierte Eigenschaft sein, mit Ausnahme von binären und mehrwertigen Eigenschaften. Auf die Eigenschaft muss durch ihren expliziten Zeichenfolgennamen verwiesen werden. Es kann nicht vom Namespace darauf verwiesen werden. Weitere Informationen zum Angeben von Sortiereigenschaften finden Sie unter Sortieren von Elementen in einem Ordner.

Das Sortieren der Tabelle entspricht dem Aufrufen einer MoveToStart -Methode. Der Cursor wird am Anfang der Tabelle positioniert.

Wenn Table.Sort und dann Table.Restrict aufgerufen werden, werden die gefilterten Elemente im neuen Table-Objekt nach der gleichen SortProperty und SortOrder sortiert.

Table.Sort unterstützt nur das Sortieren nach einer einzigen Spalte.

Beispiel

Im folgenden Codebeispiel veranschaulicht das Sortieren der Zeilen in einer Tabelle auf Basis der ReceivedTime -Eigenschaft, und es wird der Wert der Subject-Eigenschaft normalisiert MAPI für jede Zeile in der sortierten Tabelle gedruckt.

Sub SortTableByReceivedTime() 
 
 Dim oT As Outlook.Table 
 
 Dim oRow As Outlook.Row 
 
 Set oT = Session.GetDefaultFolder(olFolderInbox).GetTable 
 
 'Add normalized subject (subject without RE:, FW: and other prefixes)to the column set 
 
 oT.Columns.Add ("http://schemas.microsoft.com/mapi/proptag/0x0E1D001E") 
 
 
 
 'Sort by ReceivedTime in descending order 
 
 oT.Sort "[ReceivedTime]", True 
 
 
 
 Do Until oT.EndOfTable 
 
 Set oRow = oT.GetNextRow 
 
 'Print the normalized subject of each row 
 
 Debug.Print oRow("http://schemas.microsoft.com/mapi/proptag/0x0E1D001E") 
 
 Loop 
 
End Sub

Siehe auch

Table-Objekt

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.