2020年1月7日スポンサーリンクこんばんは。nanana-blog管理人のナナナです。ブログを訪問し記事を読んでいただきありがとうございます。ExcelのVBAで読み込むファイルを選択するためにファイルダイアログを表示させる方法があります。ダイアログを表示させるには「GetOpenFilename」と「FileDialog」を使う方法があります。本日はExcelのBVAでファイルダイアログを表示させる方法を紹介します。オプション」をクリックします。「リボンのユーザ設定」をクリックし、「開発」にチェックを入れてOKボタンをクリックします。ボタン」をクリックします。Excelの空いているところでクリックをしてボタンを作成します。マクロの登録画面が表示されるので、「新規作成」ボタンをクリックします。VBAを記述画面が表示されます。String」で文字列の変数「FileName」を生成しています。この変数にファイルのパスが格納されます。Application.GetOpenFilename("CSVファイル,*.csv")」でファイルダイアログを表示させます。括弧内の「"CSVファイル,*.csv"」で選択ファイルのフィルターをかけます。カンマの前が拡張子の説明で、後ろがフィルターです。String」で文字列の変数「FileName」を生成しています。この変数にファイルのパスが格納されます。Application.FileDialog(msoFileDialogFilePicker)」でファイルダイアログの種類を設定しています。内容msoFileDialogFilePickerファイル選択するダイアログmsoFileDialogFolderPickerフォルダを選択するダイアログmsoFileDialogOpenファイルを開くダイアログmsoFileDialogSaveAsファイルを保存するダイアログ4行目の「.Filters.Clear」でダイアログのフィルターをすべてクリアしています。デフォルトでセットされているフィルターは「"すべてのファイル","*.*"」です。"*.csv"」で新規にフィルターを追加します。フィルターは複数設定することができます。6~8行目でダイアログを表示させて、選択されたファイルのパスを変数に格納しています。最後にいかがだったでしょうか。VBAでファイルを開くダイアログを表示する方法を紹介しました。VBAでプログラムを作成していると結構使います。サンプルプログラムはコピーしてそのまま使えるので、良かった使ってください。nanana-blognanana-blogExcelExcelのプログラミングは初心者におすすめ。nanana-blog。