重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら>

【終了しました】教えて!goo新規会員登録

Sub test()
MsgBox CurrentDatabase
End Sub
を実行すると
「変数が定義されていません。」となってしまいます。

エクセルで言う
MsgBox ActiveWorkbook.Name
を行ないたいのですがどんなコードを書けばいいのでしょうか?
よろしくお願いします。

A 回答 (1件)

Access2000 以降でしたら


MsgBox CurrentProject.Name で。

Access97 なら
CurrentDB.Name で フルパスが返るので
そこから最後の「\」を探し
ファイル名のみを取得するロジックが必要です。
    • good
    • 0
この回答へのお礼

MsgBox CurrentProject.Name でできました。ありがとうございます。

お礼日時:2009/04/05 21:48

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!