(発言者削除)No.28871
おすぎ さん 10/09/07 11:29
 


[ ]
RE:28871 ワードから秀丸を起動No.28876
秀丸担当 さん 10/09/07 16:56
 

ワードでマクロを使って秀丸エディタを起動することはできるのではないかと思
います。
ワードのマクロのことはわかりませんが、VBScriptにも似ていると思うので検索
していろいろ試してみたところ、以下のような感じで起動できるようです。

ワードのマクロの例:
  Sub hidemaru()
     Dim obj As Object
     Set obj = CreateObject("WScript.shell")
     obj.Exec "c:\Program Files\Hidemaru\Hidemaru.exe"
  End Sub


秀丸エディタはCOMを介して外部からは操作できないので、ワードからの操作方法
は、秀丸エディタの起動オプション /x でマクロを起動するということになると
思います。
一方、秀丸エディタのマクロからはcreateobjectやgetobjectを使って外部のオブ
ジェクトを作ってワードを操作することができます。
これで双方からいろいろ操作できるかもしれないです。

秀丸エディタのマクロの例:
  #objWord=getobject("C:\\Folder\\test.doc");
  //または #objWord=createobject("Word.Application"); など
    :
  (以下#objWordの操作)


貼り付けは秀丸エディタのマクロでしかできないので、ワードのマクロか秀丸エ
ディタのマクロのどちらかでワード上のコピーをして、秀丸エディタのマクロで
貼り付ければいいと思います。
というわけでせっかくなのでコピーの方法も調べてやってみたところ、以下のよ
うな感じでできました。(秀丸エディタのマクロは1行だけになってしまいまし
たが…)
試してみたのはWindowsXP上のWord2000,秀丸エディタV8.01aです。

ワードのマクロの例:
  Sub hidemaru()
     Dim obj As Object
     ActiveDocument.Content.Select
     Selection.Copy
     Set obj = CreateObject("WScript.shell")
     obj.Exec "c:\Program Files\Hidemaru\Hidemaru.exe /xtest.mac"
  End Sub

秀丸エディタのマクロの例:(マクロファイル用のフォルダにtest.mac)
  paste;

[ ]
RE:28876 ワードから秀丸を起動No.28878
おすぎ さん 10/09/07 17:41
 
>秀丸担当さま

大変詳しい回答を頂きました。
ありがとうございました。
さっそく試してみようと思います。

ワードと秀丸の間の垣根を低くしようと模索しているところですが、
ワード⇔秀丸の変換が、コピペではなくワンクリックで可能になれば、
垣根もだいぶ低くなるだろうと思っています。

重ねて、ありがとうございました。


[ ]
RE:28878 ワードから秀丸を起動No.28881
おすぎ さん 10/09/07 23:22
 
>秀丸担当さま

教えていただいた貼り付け用のワードマクロ+秀丸マクロを、
実行してみました。
見事に、ワード上のテキストが秀丸ファイルにコピーされました。
ありがとうございました。

秀丸の「COMの呼び出し」マクロも勉強してみようと思います。
自信はありませんが…。


[ ]