If OpenFileName <> "False"とIf OpenFileName <> Falseの違い

開くブックをユーザーに選択してもらう場合は、[ファイルを開く]ダイアログボックスを表示するといいでしょう。 Sub Sample1() Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls?") Workbooks.Open OpenFileName End Sub [ファイルを開く]ダイアログボックスを表示するには、ApplicationオブジェクトのGetOpenFilenameメソッドを使います。GetOpenFilenameメソッドによる[ファイルを開く]ダイアログボックスは、ユーザーが選択したファイルのフルパスを返すだけで、自動的には開きません。GetOpenFilenameメソッドの書式は次の通りです。 GetOpenFilename Fil

[takuwz]

“Sub Sample1() Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls?") Workbooks.Open OpenFileName End Sub”

[baldman]

excel vbaでファイル選択のダイアログ

[hrt305]

“任意のフォルダを開きたいときは、GetOpenFilenameメソッドを実行する前に、カレントフォルダを移動してやります。”

[yamamototakehisa]

ダイアログボックス

[izoc]

vbaでのfiledialog表示方法。

[leona-kono]

ファイル名を指定して開く