将所有非拉丁字符替换为其拉丁语a-z对应字符和VBA中的字数

时间:2011-06-14 10:48:04

标签: vba alphanumeric word-count non-latin

我正在尝试在VBA中编写一个脚本    将:

  • 替换所有É和其他类似的 他们的拉丁人物 对应。

  • 删除所有非字母数字
    字符。

  • 删除重复的间距

  • 然后字数字符串

我已经知道我可以将字符串拆分为“”并计算元素以获得字数...但我正在努力解决剩下的问题。非常感谢。

1 个答案:

答案 0 :(得分:0)

Word为句子,段落和整个文档内置了一个单词计数:

 ActiveDocument.Words.Count

至于替换,记录宏以查看其工作原理可能最简单。您必须逐个替换重音字符,或使用RegEx将所有 A 类型(Å,Ä,Â,Á,À)字符替换为 A ,并且等等。