怎样避免按钮等控件影响正则表达式的准确匹配

lss001

weiyingde 发表于 2024-8-23 20:13
chr(7)是指表格，chr(1)是不是按钮呢？

在Word中应该是的
在其它的地方不一定是

weiyingde

lss001 发表于 2024-8-23 20:16
在Word中应该是的
在其它的地方不一定是

好的，谢谢你的耐心讲解。

lss001

Sub 获取word编码()
     Dim Wdoc As Document,
     Dim oAsc%, oStr$, ph As Variable
     ph = wdoc.Paragraphs(1)
     oStr = ph.Words(ph.Words.Count - 1)
     oAsc = VBA.Asc(oStr) 'Asc编码
End Sub

weiyingde

lss001 发表于 2024-8-23 20:43
Sub 获取word编码()
     Dim Wdoc As Document,
     Dim oAsc%, oStr$, ph As Variable

好的，谢谢啊。

weiyingde

lss001 发表于 2024-8-23 20:43
Sub 获取word编码()
     Dim Wdoc As Document,
     Dim oAsc%, oStr$, ph As Variable

有功夫，帮我看看https://club.excelhome.net/thread-1700214-1-1.html一楼的问题。
虽然目前得到解决，但我总念念不忘起初的问题，心中的疑惑没有得到解决，如鲠在喉，不拔不快！
先谢了。

weiyingde

lss001 发表于 2024-8-23 19:05
以下这句代码有问题
str = Replace(osr, Chr(7), "")
是否应该是写成如下

替换为“0”，这种表达还是不能成立。
因为，从道理上来讲，“0”还是字符，他还是占位置的；而替换为“”，等于在内存中删去了该字符，它是不占位置的。
我写成：str = Replace(Replace(osr, Chr(7), “”), Chr(1), “”)，
在有表格的文档中，正则能精准定位，替换为“0”，不达目的；
但Replace(osr, Chr(7), “”), Chr(1), “”)却不能消除控件对正则的影响，这说，此种表达还不行……
请移步至https://club.excelhome.net/thread-1700242-1-1.html
测试我的三个文档看看，也请继续帮忙。
先谢了。

lss001

weiyingde 发表于 2024-8-24 17:15
替换为“0”，这种表达还是不能成立。
因为，从道理上来讲，“0”还是字符，他还是占位置的；而替换为“ ...

正则表达式针对性比较强，
通用性比较弱，
应根据具体情况进行分析！

weiyingde

高人路过，搭手施援，排忧解惑，在下先谢。

weiyingde

问题还未得到有效解决，再次求助于正则大咖高人。

weiyingde

高人路过，搭手施援，排忧解惑，在下先谢。