（VBA）ブックを開いている間、常に値を保持したい

質問

お世話になります。holmonと申します。

Excelブックを開いている間、値を常に保持しておきたいのですが、方法はありますか？

具体的にやりたいこと↓
1．WorkBook_Openにてオブジェクト取得
2．上記を保持
2．ユーザーがExcel操作
3．ユーザーがExcel上のボタンを押す
4．イベント実行

4．のタイミングで、1．で取得した値を使いたいです。よろしくお願い致します。

回答No.1

n-jun · ベストアンサー

標準モジュールで
Public wb As Workbook

Sub try()
Dim F_name As Variant

F_name = Application.GetOpenFilename(FileFilter:="Microsoft Excelブック,*.xls")

Workbooks.Open Filename:=F_name
Set wb = ActiveWorkbook
End Sub

シートにコマンドボタンをおいてシートモジュールに
Sub try2()
MsgBox wb.Name
End Sub

マクロtryを実行した後でボタンを押せば、開いたブック名が見られますけど、
こんな感じとは違います？

お礼

さっそくのご回答ありがとうございます。

そんな感じです。今試したところ、上記の方法で確認できました。ありがとうございました＾＾