使用MS Word中的VBA宏,如何计算段落中有错误的单词?
嗨。
我有一个非常长的双语文本(意大利语和古希腊语)来进行代码转换;它是一个从带有自定义和封闭字体编码的.pdf转换而来的.pdf文档。
这个转换后的文档主要由意大利语段落和胡言乱语组成(因为字体有自定义编码)。
转码过程将是一个查找和替换(例如。查找"/A",替换为alpha),但我不希望宏替换意大利字母。
我得出的结论是,一种只能替换胡言乱语/希腊语的方法是,对每一段的拼写错误进行计数,只有当错误超过单词计数的5-10%时,才能对段落进行转换。(这是我第一个严肃的vba宏,如果有人对其他方法有任何建议,我们欢迎他。此外,我希望我的英语是可接受的和可读的)。
发布于 2013-08-13 12:42:45
Function ErrorPercent(para As Paragraph) As Double
With para.Range
ErrorPercent = (.GrammaticalErrors.Count + .SpellingErrors.Count) / .Words.Count
End With
End Functionhttps://stackoverflow.com/questions/18191732
复制相似问题