エクセルマクロVBA「複数の文字列に均等割りルビを追加」

前回、マクロを使ってセル内の1つの文字列だけにルビを打つことができた。ところが俳句をまとめていて一つの俳句に複数の文字列にルビを打つことが必要になることがある。そこで次のようなマクロを作ってみた。
漢字と書いたが、これはひらがなに英単語をとか、どのような組み合わせでも可能です。ここではルビは「ひらがな」、文字列に対して「均等割り付け」のルビにする、指定のセルのフォントサイズの「半分のサイズ」のルビにするという設定にしています。マクロの記述については、リンク先ホームページやエクセルマクロ有効ファイルを参考にしてください。

ホームページ内の記述

http://www.can-chan.com/vba/tsuika.html#m12 です。

エクセルのサンプルは以下のようなものです。3行目に文字列としてあげたもの全てを4行目のルビをふります。

複数語句

複数語句にルビ

複数語句にルビ

に均等ルビのマクロ複数語句に均等ルビのマクロ。ファイルをダウンロードして使用するときは、マクロを有効にしてご利用ください。ファイルサイズは17.5 KBです。