質問: エクセルからワードのマクロを実行したい 1. ワードで作られた報告書の表の数値をエクセルにコピーし、 2. その数値を使ってエクセルのオートシェイプでグラフを描き、 3. グラフをもう一度ワードの所定の位置に図として貼りつける、 というマクロを作成しています。ワードの表をコピーするマクロと、エクセルでグラフを描くマクロは作成できました。 問題はエクセルのシートに配置したコマンドボタンをクリックすると、グラフの入ったセル範囲をコピーするまではできたのですが、その後にワードのマクロを指定して実行させる方法がわかりません。 1.→2.のエクセルのマクロを実行する方はauto_openで何とかなったのですが、2.→3.は既にワード文書は開かれていますし、auto_openでは1.の手順ができなくなってしまうので困っています。 もし、エクセルのマクロでワードを操作などできるのでしたらそれでもよいのですが...。 ワードのマクロは初挑戦で、色々サイトも探したのですが見つかりませんでした...。 使用していますのは、windows98se,excel97,word97です。 ご存知の方、どうぞよろしくお願い致します。
回答: むしろ、word から excel操作すればよいのでは。 word の vbe の[ツール]→[参照設定]で microsoft excel *.* object library に チェックを入れてください。 sub test() dim xlapp as new excel.application activedocument.tables(1).rows(1).select selection.range.copy with xlapp .workbooks.add .activeworkbook.activesheet.paste .charts.add with .activechart .setsourcedata source:=xlapp.worksheets(1).range("a1").currentregion .location where:=xllocationasobject, name:="sheet1" end with .activesheet.chartobjects(1).copy selection.endkey unit:=wdstory selection.paste .activeworkbook.close false .quit end with set xlapp = nothing end sub