H1の見出しが数多くあるWORDドキュメントがあります。特定のH1見出しから次のH1見出しまでのすべての内容を削除できるマクロが必要です。本質的にH1セクションを削除します。同様に、次のH1またはH2の見出しまでH2見出しから削除したいかもしれません。マクロで見出しを削除するマクロ
0
A
答えて
0
oParagraph.Style(oParagraphはParagraphオブジェクト)を使用して段落のスタイルを指定できます。したがって、あなたは次のようなことをすることができます:
Dim oStartHeadingParagraph As Paragraph
Set oStartHeadingParagraph = Selection.Paragraphs(1)
If oStartHeadingParagraph.Style <> "Heading 1" Then
MsgBox "Please select the Heading 1 paragraph for the section you want to delete."
Else
Dim oParagraph As Paragraph
Set oParagraph = oStartHeadingParagraph
Do While Not oStartHeadingParagraph.Next Is Nothing
If oStartHeadingParagraph.Next.Style = "Heading 1" Then
Exit Do
Else
oStartHeadingParagraph.Next.Range.Delete
End If
Loop
oStartHeadingParagraph.Range.Delete
End If
0
アウトラインビューで文書を編集します。そこに移動し、次のように唯一の見出しは、レベル1を選択:
View > Outline
次に、レベルを選択します。
Show Level > Level 1.
あなたは、もはや維持したいだけH1の見出しを削除します。 &ドロップ見出しをドラッグすると、従属コンテンツが表示されます。
これは、必要に応じて大規模な編集を行うのに最適です。
関連する問題
- 1. Visual Basic Excel - 行を削除するマクロ
- 2. VBAを使用してAccessマクロをプログラムで削除する
- 3. excel vbaマクロでデータベース接続を削除する
- 4. マクロ出力なしでループする
- 5. Twigの別のマクロの中でマクロを呼び出す
- 6. Workbook-2マクロ呼び出しWorkbook-1マクロがエラー1004で失敗する
- 7. jinja2:マクロの選択マクロまたはダイナミックマクロの呼び出し
- 8. Excel VBAで特定のマクロを削除するコマンドは何ですか?
- 9. ExcelでVBAマクロからデジタル署名をプログラムで削除する方法
- 10. メソッド呼び出し内のマクロで空白文字を解除する問題
- 11. VBの見通しマクロのチェックドメイン
- 12. Clojureのマクロからマクロを返す
- 13. Cマクロで引用符を削除する方法はありますか?
- 14. Excelマクロ。列に基づいて重複しない行を削除する
- 15. FOR_EACHマクロ(呼び出しマクロ内に2つ以上のパラメータがある)
- 16. 出力マクロ実行ステップ
- 17. 文字列を見つけて一致する行を削除するVisual Studioマクロ
- 18. 既存のボタンを削除してからexcel-vbaで新しいマクロを追加するマクロを作成します。
- 19. SASマクロ:proc sqlでマクロを使用する
- 20. C++のマクロでマクロを定義できますか?
- 21. ビルドスクリプトからExcelマクロを呼び出す
- 22. emitとexprを呼び出すISPPマクロ
- 23. マクロ2008
- 24. #値!マクロ
- 25. asciidocマクロ
- 26. マクロ11
- 27. マクロの内容からマクロを定義する
- 28. C++でコンパイルするときに `restrict`キーワードを取り除くマクロ
- 29. プログラムで一致するセルが見つかるExcelマクロ
- 30. 値を返すマクロ
タイトルは全体の質問にすることが本当に必要でしたか?あなたは、私は、Wordマクロのヘルプや何かを使用したかもしれない... – MitMaro
完了。これは、SOの編集が便利な場所です。そうでなければ、SOは他のプログラミングQ&AサイトのようにGarbageで簡単に散らばっていた可能性があります。 – Aamir
私は同意しますが、悲しいことにまだ編集できません。 :P – MitMaro