表記統一この1ヶ月半ほど、イベントの手伝いをしていました。その中で、名札の作成に関わってまして、またまたマクロが活躍しました。以前紹介した「【コード】1行に収まるようフォントサイズを縮小する」を応用して、差し込み印刷機能で作成した名札を自動で修正するマクロをつくってみました。名札が数百枚もあるような場合に便利だと思います。このマクロでできること差し込み印刷機能を使うと、名前や会社名を自動的に名札に挿入できます。そのときに、文字数が多すぎて複数行になってしまう箇所だけ、文字サイズを小さくしてその項目を1行に収めます。文書中の「メイン文書」箇所のみ実行できます。差し込んだ結果をWord文書にします。会社名が長いと改行されてしまいかっこわるい!会社名は特に注意が必要です。マクロ実行後1行に収まります。Each...Loopステートメントを使っています。ステータスバーにプログレスバーを表示しています。「【コード】1行に収まるようフォントサイズを縮小する」のコードを、今回実務で使ってみて使いづらいところがあったので少し修正しました。