regex - VBA 使用正则表达式匹配希腊词作为整个词

标签 regex vba ms-word

我正在尝试以正则表达式模式匹配希腊字符。似乎 VBA 在支持 Unicode 方面非常有限,但如果可能的话,我可以使用 ASCII。这是一个示例代码:

Sub TestGreekRegEx()
Dim str 
str = "αυτό είναι ένα ελληνικό κείμενο"
Set regEx = CreateObject("vbscript.regexp")
regEx.Pattern = "\b[\xe1-\xfe]+\b"
Set Matches = regEx.Execute(str)
For Each Match In Matches
    MsgBox Match
Next
End Sub

这根本没有返回匹配项。另外,如果我在 str 的字符中循环,我得到的 ASCII 代码在\xE1 到\xFE 的范围内。

谢谢

最佳答案

试试这个

\b[\u00E1-\u03CE]+\b

顺便说一句,请确保处理 UNICODE 字符的范围。

关于regex - VBA 使用正则表达式匹配希腊词作为整个词,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/14602843/

相关文章:

performance - 在 Excel VBA 中迭代类

sql - 将十六进制数转换为带有破折号的 GUID

python - 合并 mysql 表中的字符串,无需额外空格

python - 正则表达式——不同字符串相同匹配

vba - 使用 VBA 读取企业自定义字段的值列表

javascript - 将 html 表格转换为 word 文档或可编辑的 pdf

vba - 从文档引用中取出一个词,然后用它在文档中查找和替换?

python - 使用正则表达式匹配基因组位置

java - 正则表达式从路径获取带或不带扩展名的文件名

excel - 如何不保留最后一项复制?