Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1564 / 2272 ツリー ←次へ | 前へ→

【6498】ExcelマクロでACCESSのフォームのイベン... はぐれ雲 05/10/15(土) 22:14 質問[未読]
【6500】Re:ExcelマクロでACCESSのフォームのイベ... 小僧 05/10/16(日) 3:28 回答[未読]
【6502】Re:ExcelマクロでACCESSのフォームのイベ... はぐれ雲 05/10/16(日) 11:42 お礼[未読]

【6498】ExcelマクロでACCESSのフォームのイベン...
質問  はぐれ雲  - 05/10/15(土) 22:14 -

引用なし
パスワード
   ACCESSのデータベースを開き、そのフォームのボタンをクリックした時に走るイベントプロシジャーを起動するExcelのマクロを作りたいのですが可能でしょうか。

Excelのマクロは中級レベルですが、ACCESSのVBAは素人です。どなたか分かる方があればイベントプロシジャーを起動する部分の処理をどうすればよいのかを教えて下さい、よろしくお願いします。

【6500】Re:ExcelマクロでACCESSのフォームのイベ...
回答  小僧  - 05/10/16(日) 3:28 -

引用なし
パスワード
   ▼はぐれ雲 さん:
こんばんは。

>フォームのボタンをクリックした時に走るイベントプロシジャーを起動するExcelのマクロ
>Excelのマクロは中級レベルですが

という事ですので、ちょっと板違いですが Excel の例で説明させて頂きます。

Sheet1 に配置したコマンドボタンをクリックすると動作するイベントプロシジャを
Sheet2 から呼び出すことはできますでしょうか。

>Private Sub CommandButton1_Click()
^^^^^^^

これをどうしても Sheet2 から呼び出したい時には工夫がいると思います。例えば

>Call クリック("Sheet1")

として、標準モジュールに

>Public Sub クリック(SheetName As String)

のようにシート名を渡して、シートモジュールで行っていた事を
標準モジュールでも行えるようにコーディングし直したりする事で
Sheet2 からでも同じ動作ができるようにする事が可能です。

また、余りお勧めできませんが

>Public Sub CommandButton1_Click()

として、

>Call Sheets("Sheet1").CommandButton1_Click

でも可能でしょうか。


Access の場合も同じような事が言えると思います。
フォームのボタンをクリックする事によって起きる動作を
他からも引き出せるような工夫を実現できれば
Excel から Access のプロシジャを実行させる事は可能ですよ。

参考記事:
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=181;id=access
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=5609;id=excel

【6502】Re:ExcelマクロでACCESSのフォームのイベ...
お礼  はぐれ雲  - 05/10/16(日) 11:42 -

引用なし
パスワード
   ▼小僧 さん:
提案いただいた工夫が必要で、そのままではうまく処理できないことがよく分かりました。標準モジュールでも動くようにしてトライして見ます。本当に助かりました、ありがとうございました。

1564 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078242
(SS)C-BOARD v3.8 is Free