【Excel VBA】開いているブックが保存されているフォルダを開く
Excelブックが保存されているフォルダを開きます。
' ' 開いているブックが保存されているフォルダを開く。 ' Public Sub フォルダを開く() If ActiveWorkbook.path = "" Then MsgBox "ファイルはまだ保存されていません。", vbCritical, "エラー" Else CreateObject("Shell.Application").Open ActiveWorkbook.path End If End Sub