With Application.FileDialog(msoFileDialogFolderPicker)'ファイル選択ダイアログボックスのプロパティ.AllowMultiSelect = False '複数選択を許可するかどうか（True：許可する、False：許可しない）.Title = "フォルダを選択してください" 'ダイアログボ…

Sub MergeCSVFiles4()'フォルダのパスを指定'ユーザーにCSVファイルが格納されたフォルダを選択してもらうMsgBox "データをまとめるCSVファイルが格納されているフォルダを選択してください", vbOKOnlyWith Application.FileDialog(msoFileDialogFolderPicke…