タイトル | : Re^3: マクロでの宛先欄編集 |
投稿日 | : 2010/04/27(Tue) 18:32 |
投稿者 | : はるみち |
#マクロです。
CopyString( ) ; //コピー
SaveToDraft( ) ; //草稿フォルダへ保存
OpenThisFolder( "Account8\\送信\\草稿.ctx" ) ; //このフォルダを開く
SelectAllMessage( ) ; //メッセージをすべて選択
続く部分は「ヘッダ情報検索」のSubjectをToに置き換えて作成。
異なるのは
「Subject: 」が存在しない場合はEpilogへ
とEpilogの間が
KeyDown( VK_RIGHT , 0 ) ; //→キー(「To: 」の直後へ)
SetAnchor( ) ; //アンカーの設定
KeyDown( VK_END , 1 ) ; //Endキー(行末へ)
SetAnchor( ) ; //アンカーの設定
SelectAnchorArea( ) ; //アンカー間を選択
DeleteString( ) ; //文字列削除
PasteString( ) ; //文字列貼り付け
Epilogに続いて
ReEditMessage( ) ; //再編集
SendMessageLater( ) ; //送信待ちへ
以上です。まだ不完全だと思います。ご指摘お願いします。
--------------------------------
はるみち
Windows XP Home Edition SP3
EdMax 2.86.3F