Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11042 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【18499】ファイルを開くダイアログボックスを表示させたい たけし 04/9/28(火) 15:08 質問[未読]
【18502】Re:ファイルを開くダイアログボックスを表... IROC 04/9/28(火) 15:25 回答[未読]
【18503】Re:ファイルを開くダイアログボックスを表... たけし 04/9/28(火) 15:38 お礼[未読]
【18499】ファイルを開くダイアログボックスを表示...
質問  たけし  - 04/9/28(火) 15:08 -
引用なし
パスワード
   たけしと申します。
ＶＢでファイルを開くダイアログボックスを
表示させ、ファイルを選択させたいのですが
どなたか教えていただけませんでしょうか？
【18502】Re:ファイルを開くダイアログボックスを...
回答  IROC  - 04/9/28(火) 15:25 -
引用なし
パスワード
   単純に開くために組み込みダイアログを使うなら、
Application.Dialogs(xlDialogOpen).Show

開いたファイルを操作するなら、GetOpenFilename メソッド で


GetOpenFilename メソッドの使用例

次の使用例は、ファイルを開くときに表示されるダイアログ ボックスで、
ファイルの種類をテキスト ファイルに限定して表示します。
ファイル名を選択すると、そのファイル名がメッセージ ボックスに表示されます。

fileToOpen = Application _
　　.GetOpenFilename("テキスト ファイル (*.txt), *.txt")
If fileToOpen <> False Then
　　MsgBox "選択されたファイル : " & fileToOpen
End If
【18503】Re:ファイルを開くダイアログボックスを...
お礼  たけし  - 04/9/28(火) 15:38 -
引用なし
パスワード
   　IROC 様
　教えていただき　ありがとうございました。
　選択したファイルをその後の処理で操作する
　為、GetOpenFilename メソッド　で
　出来ました。
　本当にありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11042 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free