Ｐａｇｅ 358 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼フォルダを開くコマンド しゅん 03/8/18(月) 16:02 ┗Re:フォルダを開くコマンド ichinose 03/8/19(火) 11:01 ┗Re:フォルダを開くコマンド しゅん 03/8/19(火) 13:49 ─────────────────────────────────────── ■題名 ： フォルダを開くコマンド ■名前 ： しゅん ■日付 ： 03/8/18(月) 16:02 -------------------------------------------------------------------------
| こんにちは。超初心者の質問で恐縮ですが フォルダを開くコマンドを教えて頂きたいのですが どなたかご教授下さい。 例えばフォームに「開く」ボタンを作成しクリックすると マイドキュメントフォルダが開くようにしたいのですが。 宜しくお願い致します。 Access2002 Win98 |
| ▼しゅん さん 初めまして >こんにちは。超初心者の質問で恐縮ですが >フォルダを開くコマンドを教えて頂きたいのですが >どなたかご教授下さい。 >例えばフォームに「開く」ボタンを作成しクリックすると >マイドキュメントフォルダが開くようにしたいのですが。 >宜しくお願い致します。 >Access2002 >Win98 '========================= Private Sub コマンド0_Click() Dim myshell As Object Set myshell = CreateObject("shell.application") myshell.Open 5 set myshell=nothing End Sub でどうでしょうか？ |
| ご回答頂きありがとうございました。 早速試してみたところできました。 ありがとうございました。 |