| 
    
     |  | ▼まーー さん: こんばんは。
 >>滅多にしない処理なんですが(レポートを使用したいと思った時かなあ)
 >>
 >>>Excelから"A.mdb"というAccessの"Bマクロ"というマクロを実行し、
 >>>"Bマクロ"終了後に"A.mdb"を閉じる。こんなことをやりたいのですが
 >>>超初心者でわかりませんのでやり方を教えてください。
 >>>お願いします。
 >>'=================================================
 >>Sub test()
 >>  Dim acc As Access.Application
 >>  Set acc = CreateObject("access.application")
 >>  acc.Visible = True
 >>  acc.OpenCurrentDatabase "d:\フォルダ名\A.mdb"
 >>  acc.Run "Bマクロ"
 >>  '↑"Bマクロ"が標準モジュールにある場合
 '   ↑を↓に変更してください
 acc.DoCmd.RunMacro "Bマクロ"
 '   これに変更してください
 >>  acc.CloseCurrentDatabase
 >>  acc.Quit
 >>End Sub
 >>
 >>「Dim acc As Access.Application」を宣言しているので、
 >>参照設定で「Microsoft Access 9.0 Object Library」(Office2000)にチェックを入れてください。
 >>
 >>参照設定しなくても、
 >>「Dim acc As Object」にすれば、大丈夫なんですが、参照設定すれば、
 >>accのメンバリストが表示されるのでコーディングが楽なもので・・・。
 >
 >回答ありがとうございました。
 >Bマクロは標準モジュールではなく、普通のマクロなんですけど・・・
 >それでもやる方法はありますか?(初心者なものですみません)
 「マクロ」というフレーズをVBAのプロシジャーだと思い込んでいました。
 
 
 |  |