Menuへ
Excelのあるフォルダとブックのフォルダ

Excel本体のあるフォルダを取得するには、ActiveWorkbook.Application.Path を使います。Excel2002の場合、通常「C:\Program Files\Microsoft Office\Office10」になります。
自分のブック(Excelファイル)のあるフォルダは、ActiveWorkbook.Path を使います。ブックと同じパスに設定用のファイルを保存したりする場合などよく使います。取得できたフォルダ名の最後には「¥」が付かないので、フィル名と組み合わせる場合などは注意が必要です。又、未保存の場合は、「""」が返りますので、取得後にチェックが必要です。




標準モジュールコード
'Excelのあるフォルダ
Public Function GetExcelPath() As String
    GetExcelPath = ActiveWorkbook.Application.Path
End Function

'ブックのフォルダ
Public Function GetBookPath() As String
    '保存されていない場合は空文字が返ります。
    GetBookPath = ActiveWorkbook.Path
End Function



Topへ Homeへ