ワード

メモ

• ところどころ、かってに「？」が表示されてしまいますが、 無視してください。 （？は、ないものと思ってよんでください）

• 円マークがスラッシュ（というか、逆スラッシュ）で表示されてしまっているかもしれませんが、円マークだと思ってください。

Excel

顧客データ ⇒ 住所取得のマクロが C:\temp\runMacroTest?.xls　においてあり、 マクロ名が　main　だとします。

※マクロは、Module1などといった、「標準モジュール」にかかれている必要があります。 　ThisWorkbook? や、 Sheet1 などに書かれていてはだめです。

　ただ、マクロの記録で生成されるマクロは、「標準モジュール」にかかれるので、 　あまり気にすることは無いと思います。 　

Word

ワードの「ツール」⇒「マクロ」⇒「VisualBasicEditor?」を選び、 下記を貼り付けてください。 test()を実行すると、Excelファイルが開かれ、マクロが実行されます。 ※これは、「標準モジュール」でも「ThisDocument?」でも、どちらに貼り付けても出来た。 　⇒ 気にしないでいいです。

Excelファイルの場所、マクロ名をかえるときは、 sub test()の中の、

"C:\temp\runMacroTest.xls" や
"main"

を書き換えてください。

ここ

Sub test()

   runXLmacro "C:\temp\runMacroTest.xls", "main"

End Sub

Function runXLmacro(BookName?, MacroName?)

Dim XL

   Set XL = CreateObject("Excel.Application")
   XL.Visible = True
   XL.Workbooks.Open BookName
   XL.Run XL.ActiveWorkbook.Name & "!" & MacroName
   XL.ActiveWorkbook.Close False
   XL.Quit
   Set XL = Nothing

End Function

ここ