|
▼まーー さん:
こんばんは。
>>滅多にしない処理なんですが(レポートを使用したいと思った時かなあ)
>>
>>>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のプロシジャーだと思い込んでいました。
|
|