我对 V Basic 了解甚少,但我知道我想做的事情一定很简单。我只想向下一行,向左移动,然后按退格键,这样就不会有换行符。我正在尝试格式化,以便可以将其放入 xCode。我看过其他人的问题,试图做类似的事情(重复一个宏),但总是有一些变量让它不起作用……就像它试图在文本中查找某些东西一样。我只想向下,bksp,向下 bksp 直到最后。
我的文本如下所示:“问题”、“《幽灵》的作者是谁?”、 “安德鲁·达尔保持着什么世界纪录?”、
以下是我目前录制的宏的内容:
' 重新格式化 xcode 的问题和答案文本 ' Selection.MoveDown Unit:=wdLine,Count:=1 Selection.HomeKey Unit:=wdLine Selection.TypeBackspace Selection.MoveDown Unit:=wdLine,Count:=1 Selection.HomeKey Unit:=wdLine Selection.TypeBackspace
请帮忙!谢谢!
答案1
尝试这个:
Sub ElimParas()
With ActiveDocument.Range.Find
.ClearFormatting
.Replacement.ClearFormatting
.Format = False
.Forward = True
.Wrap = wdFindContinue
.Execute FindText:="^p", ReplaceWith:=" ", Replace:=wdReplaceAll
End With
End Sub