(續)(表[0-9]@)(*)([^13]) 想查找 “續表”開頭的一整行資料進行替換
通過正則匹配可以查找到想替換的位置
但點擊替換后，替換為0
使用VBA程式也不行
With Selection.Find
.Text = "(續)(表[0-9]@)(*)(^13)" '
.Replacement.Text = "續" + uptext
.Forward = True
.Wrap = wdFindAsk
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Find.Execute Replace:=wdReplaceAll, Wrap:=wdFindStop
uj5u.com熱心網友回復：
這不是正則，也許去掉括號就行了uj5u.com熱心網友回復：
word表格前文字查找替換有BUG;轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/20037.html
標籤：VBA
上一篇：VB運行程式不出黑框
下一篇：求幫vb