Evelyn正在寻找一种将连字符添加到最初不带连字符的短语中的方法。例如,如果输入“本周我们的销售比以往任何时候都要好,并且比以前更好”,Evelyn可能希望它改为显示“本周我们的销售比以往更好,而且更好”。表示短语的连字符需要替换短语中单词之间先前的所有空格。

最快的解决方案是简单地选择短语中的单词(比以往更大和更好),然后使用“查找和替换”将所有空格替换为破折号。当然,这涉及几个步骤,如果您经常遇到这种情况,则应考虑使用宏来进行实际替换。例如,以下宏将使任务自动化:

Sub MakePhrase()

If Selection.Type <> wdSelectionIP Then         Selection.Find.ClearFormatting         Selection.Find.Replacement.ClearFormatting         With Selection.Find             .Text = " "

.Replacement.Text = "-"

.Forward = True             .Wrap = wdFindStop             .Format = False             .MatchCase = False             .MatchWholeWord = False             .MatchWildcards = False             .MatchSoundsLike = False             .MatchAllWordForms = False         End With         Selection.Find.Execute Replace:=wdReplaceAll     End If End Sub

宏首先检查以确保已进行选择。如果是这样,则所选内容中的所有空格都用破折号代替。要使宏更方便,只需将其分配给快捷键即可。然后,当需要连字短语时,只需选择单词并按快捷键即可。

注意:

如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)中描述的宏,我准备了一个包含有用信息的特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(9173)适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。 Word的旧菜单界面在这里: