

Excel VBA 別Bookへの値渡したいです。(変数に定義したもの)
Module1とModule2がある状態で、
Module1の標準モジュール内に変数date1があるとして
date1の値をModule2へ渡す方法を教えてください。
例は以下です、
Public date As Object ←こちらを別のモジュールでも使用したい(値は入ったまま)
【Module1】
Sub testA()
'連想配列の定義
Set date1= CreateObject("Scripting.Dictionary")
End Sub
【Module2】
Sub testB()
MsgBox date1(0) ←ここで使用したい
End Sub
dateには以下の配列が入っています、
date(0) = A
date(1) = B
date(2) = C
No.3ベストアンサー
- 回答日時:
こんにちは
他のブックへの値渡しは
Application.Runを使いますが、渡し先のプロシージャが実行されてしまいます
’ご質問参考例
Option Explicit
Public date1 As Object
Sub testA()
'連想配列の定義
Set date1 = CreateObject("Scripting.Dictionary")
date1(0) = "A"
date1(1) = "B"
date1(2) = "C"
Application.Run "'ブック名.xlsm'!モジュール名.testB", date1
End Sub
受け側の一例
Option Explicit
Public date2 As Object
Sub testB(date1) 'Application.Runで実行される
MsgBox date1(0) '確認用
Set date2 = date1 '受け側のトリガーで実行できるように別変数に
End Sub
Sub testC() '受け渡し側ブックの別プロシージャ
MsgBox date2(0)
End Sub
No.1
- 回答日時:
以下のようにしてください。
module1:
Public date1 As Object
Sub testA()
'連想配列の定義
Set date1 = CreateObject("Scripting.Dictionary")
date1(0) = "A"
date1(1) = "B"
date1(2) = "C"
End Sub
-----------------------------------
module2:
Sub testB()
MsgBox date1(0) ' ←ここで使用したい
End Sub
------------------------------------
module3:
Sub モジュール間テスト()
Call testA
Call testB
End Sub
実行結果
添付図参照
Sub モジュール間テスト()はmodule3でなくても構いません。
module1,module2のどちらかに格納しても問題ありません。

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel VBAで、ユーザーフォーム...
-
Excel VBAでリンク切れをチェッ...
-
ユーザー定義関数に#NAME?が返...
-
エクセルVBAでシートモジュール...
-
VBAProjectのモジュ...
-
Excelで時刻になったら知らせて...
-
EXECEL VBA コマンドボタンか...
-
モジュールとクラスの違いって...
-
VBAのモジュールについて教えて...
-
GetCursorInfoの使い方
-
Excel VBA 定義されたプロージ...
-
ユーザーフォーム上に表示され...
-
インストールされているモジュ...
-
ArduinoのジャイロモジュールMP...
-
気のせいでしょうか?
-
Excel VBA 『Call』で呼び出す...
-
ユーザー定義関数をEXCELに常駐...
-
クラスモジュールについて
-
モジュールの最大数はいくつな...
-
Access VBA標準モジュールにつ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBAでリンク切れをチェッ...
-
エクセルVBAでシートモジュール...
-
VBでグローバル変数を宣言するには
-
ユーザー定義関数に#NAME?が返...
-
Excel VBAで、ユーザーフォーム...
-
Excel VBA 定義されたプロージ...
-
vba userFormのSubを標準モジュ...
-
標準モジュールを削除したい。(...
-
'Range'メソッドは失敗しました
-
VBAで別モジュールへの変数の受...
-
モジュールからフォームのボタ...
-
モジュールの最大数はいくつな...
-
グラフのX,Y座標を取得したい
-
モジュールとクラスの違いって...
-
【vba】フォームに書いてあ...
-
Form間の値の渡し方
-
VBのフォームモジュールと標準...
-
VBA モジュールで共通に使う変...
-
Excel VBA 『Call』で呼び出す...
-
acwzlibとは?
おすすめ情報
Excel VBA 別Bookへの値渡したいです。といいますか、
別のModuleに値を渡したいです、