ListObject.Sort Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Возвращает или задает столбцы и порядок сортировки для коллекции ListObject.
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
Значение свойства
Объект Microsoft.Office.Interop.Excel.Sort, представляющий столбец или столбцы сортировки, а также порядок сортировки ListObject для коллекции.
Примеры
В следующем примере кода к текущему листу ListObject добавляется . Затем в примере заполняется ListObject, соответствующий таблице Excel, двумя строками произвольных данных и указывается, что сортировка выполняется в порядке возрастания на основе диапазона столбцов A1:A3. Далее в примере вызывается Microsoft.Office.Interop.Excel.Sort.Apply
метод для сортировки таблицы.
Этот пример предназначен для настройки на уровне документа.
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