我有一个要求,我需要在文档中检查可能包含°
和β
之类符号的文本。
我使用下面的代码将文本添加到字典中。
dict.Add Chr(176) + "C", "degrees Celsius"
dict.Add Chr(223) + "-hCG", "beta-human chorionic gonadotropin"
此外,下面的代码将字典键放入一个正则表达式中,以便我可以使用它扫描文档。
Document_Search = "\b" & dict.keys()(ia) & "\b"
Dim regEx, Match, Matches
Set regEx = New regExp
With regEx
.Global = True
.IgnoreCase = False
.Pattern = Document_Search
End With
该代码在我的系统上运行正常,该系统仅安装了一种语言-English (United States)
。
但是,当有人尝试在还安装了Chinese (Simplified)
的Windows 10系统上运行代码时,就会出现错误。
运行时错误5018,应用程序定义或对象定义的错误
我不确定额外的语言是否是实际原因;这是我现在能想到的唯一区别。
我在系统中添加了中文(简体),但没有得到错误。
如何解决此错误,并在代码中使用符号?
编辑:我已经在系统上调试了有此问题的代码。
添加到字典的值是?C
和?-hCG
;而在我的系统上,它们是°C
和β-hCG
。
我的正则表达式为Document_Search : "\b?C\b"
。
为什么Chr(176)
无法正常工作?