VBAにて Dictionaryを使いまわしたい
Dictionaryオブジェクトをデータベースとして、
色々なマクロから使うことは出来るのでしょうか?
以下のようなイメージですが、もちろん、これは動きません。
Sub データ()を関数にすると、その都度、辞書に登録という作業が生じるため、損をした気になるので質問しました。
Sub データ()
省略
Set myDic = CreateObject("Scripting.Dictionary")
省略
myDic.Add "菊", "50円"
myDic.Add "バラ", "100円"
myDic.Add "ひまわり", "100円"
省略
End Sub
Sub Aさんの買い物合計()
合計=myDic.Item("菊")+myDic.Item("ひまわり")
End Sub
Sub Bさんの買い物合計()
合計=myDic.Item("バラ")+myDic.Item("ひまわり")
End Sub
お礼
ありがとうございます。