VA公用文:裁判所提出書類などの公用文の書式を自動設定(ワードVBA)

サンプル

法律事務所では、一太郎を使っている人が多いですね。

ワードは、「インデントの設定が難しい」って言う人が多いみたいです。

それでは、VBAを使って、裁判所提出書類用のアウトラインやスタイル、インデントなどの書式を簡単に設定できるアドインを作ってみましょう。

インデントさえ簡単に設定できるようになれば、一太郎からワードに乗り換える人が増えるかも知れませんね。

このアドインは、書式の設定だけではなく、マークダウン↔アウトライン変換機能も備えています。

マークダウンって何ですか?

簡単に言うと、各段落の先頭に入力された「#」マークの数で、見出しのレベルを表す文章の表記法です。マークダウンにはほかにもいろいろな機能があるのですが、このマクロでは見出しとリストの機能だけを使っています。使ってみてもらえれば、その良さが分かると思います。

それは、楽しみですね。

サンプルのダウンロード

Windowsをご利用の場合は、こちらの統合版をダウンロードしてください(自動でインストールできます)。

Macをご利用の場合は、こちらをダウンロードして手動でインストールしてください。

Word用VBAアドインの手動インストール

使用方法

インストールから、裁判所提出書類の作成の手順、書式の設定値、カスタマイズまでを、次のウェブ版のマニュアルで説明しています。

VA公用文シリーズ(統合版) 操作マニュアル

インストールから、裁判所提出書類の作成の手順、書式の設定値、カスタマイズまでは、上の「操作マニュアル」のウェブ版マニュアルで、画面の画像とともに説明しています。ここでは、ボタンと基本の使い方、注意点をまとめます。

ボタン

リボンの「VA」タブの「VA公用文」グループに、4つのボタンがあります。Windows版では、「マークダウン」「ニュートラル」「アウトライン」が、クイックアクセスツールバー(画面左上のアイコン)にも追加されます。

  • マークダウン:見出し(アウトライン)を、「#」などの記号(マークダウン)で書いた文章に戻します。インデントは解除されます。
  • ニュートラル:インデントを付けない見出し(アウトライン)に変換します。文字を選んで押すと、選んだ段落のスタイルを「行間詰め」にします(「行間詰め」の段落を選んで押すと「標準」に戻します)。
  • アウトライン:マークダウンを、Wordの見出しスタイルを使ったアウトラインに変換し、レベルに合わせてインデントを整えます。
  • セットアップ:文書の種類を選ぶ画面を開き、ページ設定・スタイル・見出しの番号などを設定します。

使い方

  1. セットアップする:白紙の文書を開き、「セットアップ」を押します。文書の種類(裁判所提出書類・内容証明郵便・一般公用文・契約書1(法令型)・契約書2(実務型)・ビジネス文書・技術文書)とページ番号の位置を選び、「OK」を押します。確認のメッセージで「OK」を押すと、ページ設定・スタイル・見出しの番号が設定されます。
  2. マークダウンで本文を書く:見出しの行の先頭に、レベルに応じて「#」「##」「###」…と書きます(裁判所提出書類・一般公用文では、「#」が「第1」、「##」が「1」、「###」が「(1)」のレベルです。番号の書式は文書の種類によって変わります)。見出しでない行は、そのまま書きます。箇条書きは「- 」、段落番号は「1. 」で書きます。
  3. アウトラインにする:「アウトライン」を押すと、「#」が見出しの番号に変わり、見出しと本文のインデントが整います。
  4. 直す:見出しを足したり、レベルを変えたりしてインデントが崩れたら、もう一度「アウトライン」を押します。マークダウンに戻して直したいときは「マークダウン」を、インデントを付けずに編集したいときは「ニュートラル」を押します。
左上のボタンを押すと切り替わります
マークダウン:AIの出力をWordに貼り付けた状態
マークダウン:AIの出力をWordに貼り付けた状態
アウトライン:VA公用文で裁判所提出書類の書式を設定した状態
アウトライン:VA公用文で裁判所提出書類の書式を設定した状態

表題や当事者の表示などの前付けは、本文を書いた後で、最初の見出しより上に書きます。最初の見出しより前の段落は、変換しても書式が変わりません。

AIの下書きを使う

ChatGPTやClaudeにMarkdownで書いてもらった下書きを、本文に貼り付けて「アウトライン」を押すと、裁判所提出書類の書式に整います。貼り付けた文章に、手動改行・リンク・水平線(---)・強調記号(** など)があると、「Wordに最適な形式へ一括整形しますか?」と確認するメッセージが出ます。「はい」を押すと、先頭のフロントマター(--- で囲まれた設定の部分)と水平線の段落を削除し、強調記号は文字を残して記号だけを取り除いてから変換します。AIに示す出力形式の指示は、こちらの記事で紹介しています。

変換の対象にならない段落

  • 最初の見出しより前の段落(表題・前付け)
  • 最初の見出しより後で、右揃えの段落と、それより後の段落(付記など)
  • 「標準」「見出し」「リスト段落」以外のスタイルの段落(「行間詰め」など)

インデントを自動で付けたくない段落は、文字を選んで「ニュートラル」を押し、「行間詰め」スタイルにします。表の中の段落には、変換のときに「行間詰め」スタイルが設定されます。行頭の空白は、インデントに置き換えます。

注意点

  • 日本語版のWord専用です(スタイル名「見出し 1」「標準」「リスト段落」「行間詰め」「表題」の日本語名で判定しています)。
  • 変換は、Ctrl+Z 1回では元に戻りません。大事な文書は、変換の前に保存しておいてください。
  • セットアップで選んだ内容は、アドインに保存され、次回の初期値になります(すべての文書で共通)。設定が記憶されない場合は、WordのSTARTUPフォルダの書き込み権限を確認してください。
  • セットアップは、Wordのリストライブラリ(箇条書き・段落番号・アウトライン)の1番目を、VA公用文の番号書式に書き換えます。これはWord全体の設定のため、ほかの文書でリストライブラリを開いたときにも反映されています。
  • 入れ子の箇条書きは1段にそろえます。マークダウンの表、コードブロック、<br>、「1)」「(1)」「①」の形の番号には対応していません。
  • 見出しの番号や箇条書きが正しく表示されない場合は、いったん「マークダウン」を押してから「アウトライン」を押すか、セットアップをやり直してください。
  • 文書の種類ごとの番号の書式・インデント・余白などは、アドインの定数(cstSettings モジュール)で変えられます。

参考文献

書式については、次の資料を参考にしています。

マークダウンからの変換については、こちらの記事を参考にしました。
素晴らしいアイデアを公開していただいたstabucky.com様に感謝申し上げます。

コメント

  1. keitaro より:

    はじめまして、この記事とWordファイルに感激しました。
    影本さまはセミナーなどやっていますでしょうか?
    「分かりやすい公用文の書き方 第2次改訂版」のルールに沿ったワードマークダウンが必要となっています。
    影本様にココナラなどで委託することはできますでしょうか?

    • 管理人 より:

      コメントありがとうございます。
      このテンプレートは、自分でも「イケてるんじゃないか?」と思っていましたので、このようなコメントを頂けて、こちらも感激しています。
      頂いたご質問への回答は、次のとおりです。
      ・セミナーは、行っていません。(それほどの能力はないと思っています。)
      ・業務の委託は引き受けておりません。(本サイトへの協賛金は受け付けております。)
      ・このテンプレートは、私の勤務する法律事務所のニーズに合わせたものであり、「分かりやすい公用文の書き方 第2次改訂版」のルールは確認していません。今後、対応について検討させていただきたいと思います。

  2. 葵 より:

    お初にお目にかかります。IT企業勤めですが、地方公共団体向けに報告書を納品するような部署にいる非プログラマーです。この「VA公用文」の細かい作りこみに感激いたしました。

    これまで最終的なレイアウトの調整に多大な時間を費やしていたのですが、マークダウンとWordの相互変換というアイデアで、ここまでスムーズな作業ができるとは思いませんでした。

    一般公用文で作成した文書を元行政マンに見せてもフォント、インデント、見出しは違和感ない仕上がりのようです。

    少しでも貢献できればと、まずは個人的に協賛させていただきます。

    • 管理人 より:

      ご丁寧なコメントをいただき、ありがとうございます。

      「報告書」ということであれば、表題や見出しをゴシック体にするというようなニーズがあるかもしれません。
      もしそうであれば、「VAスタイル」を併せて利用することで、フォントを簡単に変更したり、元に戻したりできます。

      また、「VA公用文」を使ったワードのマニュアルもこちらに掲載しています。
      裁判所提出書類用の内容となっていますが、一般公用文にもほとんどそのまま使えると思います。

      ご要望等ありましたら、遠慮なくお知らせください。

  3. 管理人 より:

    次のとおり変更しました。(Ver800)
    ・ビジネス文書に対応
    ・装飾付ページ番号に対応
    ・箇条書きまたは段落番号以降は、マクロの対象とするように変更(見出しのない文章にも対応)
    ・セクション区切りの検出処理を簡素化
    ・インデント時のアウトライン及びリスト設定を削除することでコードを簡素化(見出しや段落番号の番号に問題が生じた場合には、一旦マークダウンに変換することが必要)
    ・アウトライン及びリスト設定の再設定を可能にするため、セットアップ時にマークダウンへの変換を追加
    ・インデントの開始・終了段落設定機能を削除し、進捗率算定を簡素化
    ・リストおよびアウトラインのフォント関連の設定をスタイルに連動するように修正(VAスタイルによるスタイル変更を自動的に反映)
    ・セットアップ時の各プロシージャにエラー処理を追加
    ・設定をテンプレートではなく、設定ファイルに保存するように変更
    ・セットアップメニューの初期値設定機能を削除
    ・オブジェクト変数の解放を追加
    ・ヘルプ表示機能を削除

  4. 資 より:

    お世話になっております。
    本日、突然、VA公用文が機能しなくなりました。「#」が「第1」に変換されないなど、マークダウン書式の変換ができなくなりました。昨日までは、まったく問題なく使用できていました。
    VA公用文のバージョンは767.dotm(→8A1にアップデートしましたが、同様に機能しません)
    OSはMACOS Tahoe26.3.1
    ワードは16.106.3 (26030211)です。

    • 管理人 より:

      ご連絡ありがとうございます。
      マークダウン→アウトラインの変換が全く行われない場合の原因には、次のようなものが考えられます。
      ・段落のスタイルが「標準」以外(「目次」など)になっている。
      ・見出しより後に「右揃え」になっている段落がある。
      ・マークダウン記号の定数(マクロの設定値)が「#」以外のものになっている。
      ・Wordのバージョンアップによる影響
      ご確認ください。

      • 管理人 より:

        別途お送りいただいたファイル(Obsidianで出力したもの)を確認したところ、変換がうまくいかなかった原因が判明いたしました。

        ・改行コードが「任意指定の行区切り(^l)」になっている
        各行の末尾が「段落記号(Enter)」ではなく、「任意指定の行区切り(Shift + Enter)」で入力されていました。VA公用文のマクロは「段落(改行記号まで)」を一つの単位として認識して変換を行うため、すべてが一行として扱われてしまい、2行目以降の「#」が正しく認識されなかったようです。

        ・マークダウン記号へのハイパーリンク設定
        「#」の記号自体にハイパーリンクが設定されていました。これにより、マクロが記号を「テキスト」として読み取ることができず、変換処理がスキップされてしまったものと考えられます。

        • 管理人 より:

          ObsidianやNotionなどの外部ツールに由来する特殊な改行やリンクが含まれる場合でも、スムーズに変換できる機能を追加しました。(Ver8B0)

  5. 管理人 より:

    次のとおり変更しました。(Ver8D0)
    ・段落番号のマークダウン「10.」以降を認識するように修正
    ・フロントマターの判定を厳格化し、文頭の水平線(—)から本文が削除されるバグを修正
    ・水平線(—、***、___)の段落を削除する機能を追加
    ・強調記号(**、__、*、_)を除去する機能を追加
    ・外部ツール由来要素の一括整形の確認メッセージに、対象の要素と削除される内容を明記
    ・行頭の半角空白の削除をSelection操作からRange操作に変更(処理中はスマート カット アンド ペーストを無効化)
    ・契約書2(実務型)の番号スタイルの要素数を9に修正
    ・用紙サイズの幅の定数を数値に修正
    ・配置に関する定数をLong型に変更し、名称をlngTitleAlign、lngJustおよびlngAlignに変更
    ・マークダウン記号に「.」を使う場合に、オートコレクトの「...」を削除したことを通知するように変更
    ・オートコレクトの「...」の削除後に、ページ設定のエラー処理が無効になっていたバグを修正
    ・右余白の計算のmm・pt換算をWord組み込みの関数に変更(換算係数が正確になったため右余白の計算値が約0.01mm変化。字送りの丸め結果は変わらない)
    ・インデント解除時に「標準」だけ.Resetを使い、見出し・リスト段落は個別に解除する理由をコメントに明記
    ・ニュートラル・マークダウン・アウトラインへの変換を、Ctrl+Z 1回で元に戻せるように変更(Mac版Wordでの動作が未確認のため、定数blnUseUndoRecordにより、Mac版では既定で無効)
    ・3つの変換処理の前処理・後処理を共通化
    ・ニュートラルでマークダウンを変換した後に、画面表示とマウスポインタが元に戻らないバグを修正

  6. 管理人 より:

    次のとおり変更しました。(Ver8D1)
    ・変換の前処理(表のスタイル・行頭の空白の処理など)でエラーが起きた場合に、マクロが停止し、スマート カット アンド ペーストの設定・元に戻す(Undo)の記録・画面表示が元に戻らないバグを修正

  7. 管理人 より:

    次のとおり変更しました。(Ver8D2)
    ・セットアップで、文書の最後の段落に文字がある場合に、その段落が削除されるバグを修正
    ・サンプルの追加で、文書の最後の段落(既存のサンプルを上書きする場合は、サンプルの直前の段落)がサンプルで上書きされるバグを修正

  8. 管理人 より:

    次のとおり変更しました。
    ・「操作マニュアル」の節に、ウェブ版のマニュアル(インデントが簡単に揃う! VA公用文を使ったワード・マニュアル)へのリンクを追加しました。
    ・外部ツール由来要素の一括整形を行うと、Wordが強制終了するバグを修正しました(元に戻す(Undo)の記録の中での「すべて置換」が原因のため、Ctrl+Z 1回で元に戻す機能を廃止)。(Ver8D3)
    ・仕様を、利用者向けのマニュアル(ボタン・使い方・注意点)に置き換えました。

  9. 管理人 より:

    使い方に、マークダウンとアウトラインのWordの画面を、ボタンで切り替えて見比べられる画像を加えました。

タイトルとURLをコピーしました