秀丸エディタの内容をワードにコピーするNo.06685
n'Guin さん 11/07/05 16:23
 
いつもお世話になっております。

秀丸エディタの内容をワードのカーソル位置にコピーするマクロを作成できないかと
思って、本会議室のログを見たら、COM を扱えないといけないとあって、すぐにはで
きないなぁと思っていました。

今回、他のマクロを作っているときに、マクロヘルプをみたら、Ver. 8 から、COM
を扱えるようになったと記載がございました。
秀丸エディタの内容をワードのカーソル位置にコピーするマクロを作成するために、
どのようなサイトを見て参考にしたらよいのかも、よくわかりませんでした。

“教えてくん”の質問になってしまい、申し訳ありませんが、ヒントをいただければ
幸いです。 どうかよろしくお願いします。

[ ]
RE:06685 秀丸エディタの内容をワードにコNo.06686
秀まるお2 さん 11/07/05 18:26
 
 ちょっと探してみたら、"Word.Application"のオブジェクトを生成してやって、
それのメソッドなりプロパティなりを呼び出してやればいろいろコントロール出
来るらしいです。

 今ちょっと探した限りでは、Word.ApplicationオブジェクトのActiveDocument
プロパティを取得して、それ(Word.Documentオブジェクト)のメソッド呼び出
しをすればいろいろ出来るような…

 誰か詳しく人いたら教えて欲しいです。

[ ]
RE:06685 秀丸エディタの内容をワードにコNo.06688
h-tom さん 11/07/05 23:35
 

h-tom です。

>今回、他のマクロを作っているときに、マクロヘルプをみたら、Ver. 8 から、COM
>を扱えるようになったと記載がございました。
>秀丸エディタの内容をワードのカーソル位置にコピーするマクロを作成するために、
>どのようなサイトを見て参考にしたらよいのかも、よくわかりませんでした。

エラー処理が、何も入っていないので、追加する必要がありますが、
Vista/Word2007 では、動きました。
(開いているWordのカーソル位置に"秀丸マクロで追加"が挿入される。)

「Microsoft Word Visual Basic Reference」を見れば、オブジェクトとかの
説明はあります。
http://msdn.microsoft.com/en-us/library/aa272078%28v=office.11%29.aspx
あとは、「WSH WORD」で検索すれば、何とかなるでしょう。

#objWord   = getobject("","Word.Application");
//#objDoc    = getpropobj(#objWord, "Documents");
//#objActive = getpropobj(#objWord, "ActiveDocument");
#objSelection = getpropobj(#objWord, "Selection");
//message str(getpropnum(#objDoc, "Count"));
//message getpropstr(#objActive, "Name");

callmethod #objSelection ,"TypeText","秀丸マクロで追加";
endmacro;

[ ]
RE:06688 秀丸エディタの内容をワードにコNo.06690
n'Guin さん 11/07/06 10:04
 
秀丸まるおさん、h-tom さん

おはようございます。

情報をいただき、加えてマクロを作成していただき、ありがとうございます。


>エラー処理が、何も入っていないので、追加する必要がありますが、
>Vista/Word2007 では、動きました。
Windows7/Word2010 でも動きました。


>あとは、「WSH WORD」で検索すれば、何とかなるでしょう。
ありがとうございます。
がんばってみます。

[ ]