find函数问题求大神解决
Sub h()Selection.Find.ClearFormatting
With Selection.Find
.Text = "["
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindAsk
.Format = False
End With
Selection.Find.Execute
End Sub
其中 .Text = "[" 这一句如果改成能搜索Text="["&number&"]"
就是搜索出“【任意整数】”就用空白代替
number这个数字可以是1000以内正整数,不知道写这个程序了。
vb中要text可以代表任意数的代码是什么??求大神指教
[此贴子已经被作者于2017-3-18 15:47编辑过]