|
直前のスレッドで、ワードのコマンドを使い、フォーカスをワードから秀丸を移す方
法についてお尋ねした柳絮です。私のしたいのは
(1)ワードのテキストをコピーして
(2)ワードから秀丸(既に開いている)に移動し
(3)秀丸でマクロを実行しテキスト加工し ←ここの質問です
(4)秀丸で最終のテキストを固定する
ということです。
(2)までできました。つまりワードでテキストをコピーし(それがクリップボード
に残っています)、その上でフォーカスを開いている秀丸ファイルに移動したのです。
秀丸ファイルに移動するときのワードのコマンドは次のとおりです。
Sub 貼込み秀丸へ()
Dim obj As Object
Set obj = CreateObject("WScript.shell")
obj.Exec """c:\Program Files\Hidemaru\Hidemaru.exe"" /m3 C:yyy\zzz.txt"
End Sub
*
さて、コピーされたテキストを加工して、その秀丸ファイルに加工後のテキストを貼
り付ける、というのがゴールなのですが、その為にはどうしたら良いのかというのが
ご質問です。加工処理の内容は既に秀丸マクロで作ってあります。
これまではコピーしたテキストを秀丸に貼り付けた上で、加工用の秀丸マクロのシ
ョートカットキーを手で起動していました。それにより最初ワードと同じであった秀
丸ファイル上のテキストが、加工されます。
これを今度はフォーカスが秀丸に移った瞬間に加工用マクロが動くようにしたいので
す。要するにフォーカスがワードにあるときに、ワードのマクロコマンドをショート
カットキーを使って起動するだけで、秀丸にフォーカスが移り秀丸のマクロコマンド
も同時に動くようにしたいのです。秀丸にフォーカスが動いたときに何もしなくて済
むようにしたい、というのが眼目です。
それはワードのコマンドの方に書いておくのか、それともフォーカスが秀丸(既に開
いている)に移ったときに何か設定をしておけば秀丸側でマクロが動くのか、そこが
わからないのです。
どうぞよろしくお願いします。
柳絮
|
|