使用VBA程序如下编写对第一列按字母数字进行排序。
Application.ActiveDocument.Tables(1).Select
Selection.Sort ExcludeHeader:=True, FieldNumber:="Column 1", _
SortFieldType:=wdSortFieldAlphanumeric, _
SortOrder:=wdSortOrderAscending
上述排序,是对整个表格扩展后的排序,其中的排序类型有:字母数字、数字、日期,可以对多行排序。