Word VBA自动排版（5）- 专利具体实施方式批量增加附图标记
专利说明书在撰写时，如遇到附图标记过多时，往往需要手动替换各部件以增加附图标记，较为耗时，通过下述代码可对文中的所有部件快速标记，通常只需几秒。Sub 自动增加附图标记()Dim fea(0 To 9, 0 To 9, 0 To 9) As Stringi = 1Do With Selection.find .Text = "[!0-9]" & i &a...
