msoFileDialogFolderPicker

オフィス２００３を使っています。

Sub Sample1()
With Application.FileDialog(msoFileDialogFolderPicker)
If .Show = True Then
MsgBox .SelectedItems(1)
End If
End With
End Sub
をエクセルの標準モジュールに張り付けるとフォルダを選択するダイアログが開きますが、
アクセスに張り付けると
「msoFileDialogFolderPicker」
の部分が、「変数が定義されていません」となってしまいます。

アクセスでも使えるようにするにはどうすればいいでしょうか？

No.1 ベストアンサー 回答者： nicotinism 回答日時： 2012/07/28 00:26

VBE のツール → 参照設定 で

Microsoft Office 11.0 Object Library
にチェックは入っていますか？

この回答へのお礼

Microsoft Office 11.0 Object Libraryにチェックが必要なのですね、
確認してみます。ありがとうございました。

お礼日時：2012/07/28 12:44