丽贝卡（Rebecca）正在寻找一种用“和”（and）替换句子中最后一个逗号的方法。她显然需要执行大量这种类型的编辑，并认为可能有一种快速简便的方法来进行编辑，而不需要手动进行。

在Word中没有进行此特定编辑的内置方法，但是您可以创建一个简单的宏，该宏将搜索最后一个逗号，将其删除，然后键入所需的单词。下面是这种宏的一个示例。

Sub ReplaceLastComma()

Dim J As Integer     Dim bRep As Boolean     Dim sRaw As String

Selection.Sentences(1).Select     sRaw = Selection.Text     bRep = False     For J = Len(sRaw) To 1 Step -1         If Mid(sRaw, J, 1) = "," Then             Selection.Collapse Direction:=wdCollapseStart             Selection.MoveRight Unit:=wdCharacter, Count:=J - 1             Selection.Delete Unit:=wdCharacter, Count:=1             Selection.TypeText Text:=" and"

J = 1             bRep = True         End If     Next J     If Not bRep Then Selection.Collapse Direction:=wdCollapseStart End Sub

宏选择当前句子（插入点位于该句子中，然后向后浏览该句子的文本。（该文本被分配给变量sRaw为便于处理。）如果找到逗号，则

||逗号，您可以进行快速更改以删除要删除的行（并更改之前的行，以使移动是“ J + 1”而不是“ J-1”），或者您可以在逗号之前简单地添加逗号

|| 注意：

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

link：/ wordribbon-WordTipsMacros [Click此处以在新的浏览器标签中打开该特殊页面]。

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

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（5401）适用于Microsoft Word 97、2000、2002和2003。您可以找到用于Word（Word 2007）的功能区界面的本技巧的一个版本。和更高版本）在这里：

链接：/ wordribbon-Replacing_the_Last_Comma [替换最后一个逗号]。