请问熟练VBA&Word编程高手-关于特定字符串定位有关问题

请教熟练VBA&Word编程高手—关于特定字符串定位问题word文档中有N（N>20）个表格，这些表格都不是普通的规则表格。比如：3行4列、5行4列这样的表格。表格中有按规则的编号字符串，比如：第一个表格的第一个“单元格”中的字符串是：“001”，横向第二个“单元格”的字符串是：“002”，依次类推。问题：： 想通过使用VBA中的Range 对象，包括与该对象相关的方法属性等。实现准确对“001”，“002”这些字符串的定位。并且给找到的字符串添加上书签。想通过循环来实现对所有的字符串添加书签，字符串的编号规则就是“00X”，可以在代码中把X定义成一个变量。大致的思路就是这样。请高手们给点思路。Set WordDoc = WordApp.ActiveDocumentDim myRange As RangeDim bianhao As StringFor i = 0 To 3………………..WordApp.Selection.Bookmarks.Add ("bianhao_" & i)Next i——解决方案——————————————————– Selection.Find.ClearFormatting With Selection.Find .Text = "001" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = True .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute那么，不如我们礼貌地保持相对距离，不至于太冷，不至于太痛。