有谁能把这段WORD的宏改成让它查找所有全角字符“空格”并删除。谢谢!

    Selection.Find.ClearFormatting    With Selection.Find        .Text = "  "        .Replacement.Text = ""        .Forward = True        .Wrap = wdFindContinue        .Format = False        .MatchCase = False        .MatchWholeWord = False        .MatchByte = True        .MatchWildcards = False        .MatchSoundsLike = False        .MatchAllWordForms = False    End With    Selection.Find.Execute    Selection.TypeBackspace     End WithEnd Sub

第1个回答  2012-02-28
把“.Text = " "”中双引号中的半角空格改为全角空格,即:
.Text = " "
相似回答
大家正在搜