EXcelのマクロで相対パスでファイルを開く - OKWAVEこんにちは。 ご質問の「相対パス」なら、#1さんが正解だと思いますし、Current Directory を移動させてしまえば、ファイル名の指定も、パスなしで指定できます。 ただ、私の場合は、だいたい、以下のようなコードを書くことが多いです。 '------------------------------------------- Dim fName As String Dim mPath As String mPath = ThisWorkbook.Path fName = "Test1.xls" i = Len(mPath) - Len(Replace(mPath, "\", "")) If i > 1 Then mPath = Mid(mPath, 1, InStrRev(mPath, "\") - 1) Workbooks.Open mPath & "\" & fName End
