マクロ 公開データ (2000.10～2008.01)

[1094] ルビ振りマクロ - ruby <> 06/07/25 10:36

 
 Subject: [1094] ルビ振りマクロ
    Date: Tue, 25 Jul 2006 10:36:00 +0900
    From: ruby <>

HTMLメールを作成する際に、ルビ（ふりがな）のタグを挿入することができるマクロです。
使い方は、たとえば「漢字」という文字にルビをつけたい場合には、EdMaxのエディタ画面上に

　　漢字（かんじ）

と本文に書いて、上記の部分をカッコ（）も含めて選択状態にします。
その状態でマクロを実行すると、

　　<ruby><rb>漢字</rb><rp>（</rp><rt>かんじ</rt><rp>）</rp></ruby>

といった形に変換されます。カッコ（）は全角・半角どちらでも大丈夫です。
ルビが表示されるのはIEのみですが、相手がEdMaxやOutlook Expressなら問題なく表示されると思います。
HTMLメールだけでなく、ホームページ作成やブログの記事の編集の際にも使えます。
定型本文などにマクロを登録して使うと作業効率も良くなると思います。


// Start of EdMax Macro

SetFocusToEditor();
SaveCurrentAutoFormSwitch( ) ;
SaveCurrentFindCondition( ) ;
OffAutoForm( ) ;
CutString( ) ;
InsertString( "<ruby><rb>" ) ;
PasteString( ) ;
FindString( FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , "(" ) ;
KeyDown( VK_LEFT , 0 ) ;
InsertString( "</rb><rp>" ) ;
KeyDown( VK_RIGHT , 0 ) ;
InsertString( "</rp><rt>" ) ;
FindString( TRUE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , ")" ) ;
KeyDown( VK_LEFT , 0 ) ;
InsertString( "</rt><rp>" ) ;
KeyDown( VK_RIGHT , 0 ) ;
InsertString( "</rp></ruby>" ) ;
RestoreAutoFormSwitch( ) ;
RestoreCurrentFindCondition( ) ;

// End of EdMax Macro