☰

マクロを文書の最後まで繰り返す方法 - MacOS High Sierra v 10.13.6 - Microsoft Word for Mac v 16.15

tag-icon • tag-icon microsoft-word macros
マクロを文書の最後まで繰り返す方法 - MacOS High Sierra v 10.13.6 - Microsoft Word for Mac v 16.15

V Basic についてはほとんど知りませんが、やりたいことは簡単なはずです。1 行下に移動して左に移動し、改行しないようにバックスペースを押したいだけです。xCode に入力できるようにフォーマットしようとしています。他の人の質問を見て、同様のこと (マクロの繰り返し) をしようとしましたが、常に何らかの変数が機能しないため、テキスト内で何かを検索しようとしているようです。下に移動して、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

関連情報