怎样用VBA在word中实现如下功能？
比如，有这样一word文档，其结构如下：
一、表
1、TableC
……
2、TableA
……
3、TableB
……
二、视图
1、vw_2
……
2、vw_1
……
3、vw_3
……

里面有没自动排序的功能，让它变成这样：
一、表
1、TableA
……
2、TableB
……
3、TableC
……
二、视图
1、vw_1
……
2、vw_2
……
3、vw_3
……

哪位大侠帮帮忙，谢谢拉。。。

[解决办法]
用录制宏功能录一个，再做一些修改。
[解决办法]
把
一、表
1、TableC
做成多级标题
Ctrl+X Ctrl+V之后1 2 3的序号会自动重排

另:没有自动的办法,除非自己写程序,但那样花的功夫更大