SortBy Property Example
This example sets the first index in the current document to sort by the number of strokes.
ActiveDocument.Indexes(1).SortBy = _ wdIndexSortByStroke