我在excel文件中有一些类似于以下内容的文本:
ThisWorkbook.Sheets("PO1's").Range("A7").End(xlDown).Offset(-1, 0).PasteSpecial(xlPasteFormats)
我正在尝试使用正则表达式来匹配所有这些单词并将其保存到alpha123_4rf
45beta_Frank
Red5Great_Sam_Fun
dan.dan_mmem_ber
huh_k
han.jk_jj
huhu
中。
我已尝试set()
,如https://docs.microsoft.com/es-es/office/vba/api/excel.xlpastetype所示。但是似乎无法捕获没有特殊字符的单词r"(\w+..*?_.*?\w+)"
。
答案 0 :(得分:2)
您的正则表达式正在捕获其中带有_
,而没有huhu
的单词。
您可以更改正则表达式以多次匹配每个字母,数字,下划线和点。
([\w.]+)
如果您想匹配更精确的内容,则可能需要向我们提供有关您的环境以及您要匹配的内容的更多信息。