ListObject.Sort Eigenschaft

public:
 property Microsoft::Office::Interop::Excel::Sort ^ Sort { Microsoft::Office::Interop::Excel::Sort ^ get(); };

public Microsoft.Office.Interop.Excel.Sort Sort { get; }

member this.Sort : Microsoft.Office.Interop.Excel.Sort

Public ReadOnly Property Sort As Sort

Eigenschaftswert

Eine Microsoft.Office.Interop.Excel.Sort, die die Sortierspalte oder -spalten und die Sortierreihenfolge für die ListObject Auflistung darstellt.

Beispiele

Im folgenden Codebeispiel wird dem aktuellen Arbeitsblatt ein ListObject hinzugefügt. Das Beispiel füllt dann die auf, die ListObjecteiner Excel-Tabelle entspricht, mit zwei Zeilen beliebiger Daten auf und gibt an, dass die Sortierung basierend auf dem Spaltenbereich A1:A3 in aufsteigender Reihenfolge ausgeführt werden soll. Als Nächstes ruft das Beispiel die Microsoft.Office.Interop.Excel.Sort.Apply -Methode auf, um die Tabelle zu sortieren.

Dieses Beispiel gilt für eine Anpassung auf Dokumentebene.

private void SortListObject()
{
    // Create ListObject control (table) and set table style
    Microsoft.Office.Tools.Excel.ListObject employeeTable =
        this.Controls.AddListObject(this.Range["A1"], 
        "employeeTable");

    // Populate table with some data
    Excel.Range rng;
    rng = employeeTable.InsertRowRange;
    ((Excel.Range)rng[1]).Value2 = "bb";
    ((Excel.Range)rng[2]).Value2 = "b1";
    Excel.ListRow row2 = employeeTable.ListRows.AddEx(
         true);
    rng = row2.Range;
    ((Excel.Range)rng[1]).Value2 = "aa";
    ((Excel.Range)rng[2]).Value2 = "a1";

    // Set sort properties        
    employeeTable.Sort.SortFields.Add(this.Range["A1", "A3"],
        Excel.XlSortOn.xlSortOnValues, 
        Excel.XlSortOrder.xlAscending);

    // Sort worksheet
    employeeTable.Sort.Apply();

}

Private Sub SortListObject()
    ' Create ListObject control (table) and set table style
    Dim employeeTable As Microsoft.Office.Tools.Excel.ListObject = _
        Me.Controls.AddListObject(Me.Range("A1"), "employeeTable")

    ' Populate table with some data
    Dim rng As Excel.Range
    rng = employeeTable.InsertRowRange
    rng(ColumnIndex:=1).Value2 = "bb"
    rng(ColumnIndex:=2).Value2 = "b1"
    Dim row2 As Excel.ListRow = employeeTable.ListRows.AddEx( _
        AlwaysInsert:=True)
    rng = row2.Range
    rng(ColumnIndex:=1).Value2 = "aa"
    rng(ColumnIndex:=2).Value2 = "a1"

    ' Set sort properties        
    employeeTable.Sort.SortFields.Add(Me.Range("A1", "A3"), _
        Excel.XlSortOn.xlSortOnValues, Excel.XlSortOrder.xlAscending)

    ' Sort worksheet
    employeeTable.Sort.Apply()

End Sub

Gilt für: