VBA、自分の備忘録用。 Dim FilePath As String Dim FileName As String FilePath = "フォルダの指定、最後に\をつけるのがコツ!\" With Application.FileDialog(msoFileDialogOpen) .InitialFileName = FilePath’指定フォルダを初期表示する .Show ...