諸位大神，如何用vba把文檔里的標(biāo)題重新排序

aaxclxcl · 發(fā)表于 2017-4-26 14:40:37

現(xiàn)在有一個(gè)文檔，文檔結(jié)構(gòu)大致如下：3 一級(jí)標(biāo)題
3.1 二級(jí)標(biāo)題
      3.1.1 三級(jí)標(biāo)題
3.2 二級(jí)標(biāo)題
3.3 二級(jí)標(biāo)題
      3.3.1 三級(jí)標(biāo)題
5 一級(jí)標(biāo)題
5.1 二級(jí)標(biāo)題
      5.1.1 三級(jí)標(biāo)題
5.2 二級(jí)標(biāo)題
5.3 二級(jí)標(biāo)題
      5.3.1 三級(jí)標(biāo)題

8 一級(jí)標(biāo)題
8.1 二級(jí)標(biāo)題
      8.1.1 三級(jí)標(biāo)題

...
當(dāng)然序號(hào)也不一定是3.5.8，現(xiàn)想要把標(biāo)題序號(hào)按照次序重新生成，變成如下：
1 一級(jí)標(biāo)題
1.1 二級(jí)標(biāo)題
      1.1.1 三級(jí)標(biāo)題
1.2 二級(jí)標(biāo)題
1.3 二級(jí)標(biāo)題
      1.3.1 三級(jí)標(biāo)題
2 一級(jí)標(biāo)題
2.1 二級(jí)標(biāo)題
      2.1.1 三級(jí)標(biāo)題
2.2 二級(jí)標(biāo)題
2.3 二級(jí)標(biāo)題
      2.3.1 三級(jí)標(biāo)題

3 一級(jí)標(biāo)題
3.1 二級(jí)標(biāo)題
      3.1.1 三級(jí)標(biāo)題

...

附件為文檔，請(qǐng)問(wèn)用vba應(yīng)該怎么寫呢，先謝謝了，求大神幫幫忙。