Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

ブックのパスを取得（FullName プロパティ,Path プロパティ）

2015/12/02

FullName プロパティ・Path プロパティ

ブックのパス（保存場所）を調べるには、Workbook オブジェクト の Path プロパティ や FullName プロパティ を使用します。

Path プロパティ

ブックのパス（保存先フォルダ）を取得します。通常、パスの最後に「\」はつきません。ただし、ドライブのルートの場合は「\」をつけます（「C:\」「D:\」など）。
保存されていないブックの場合は、空文字（””）を返します。

【書式】

object.Path

引数・戻り値

object ・・・対象となる Workbook オブジェクトを指定します。

FullName プロパティ

ブックのパス（保存先フォルダ）と名前を取得します。保存されていないブックの場合は、ブックの名前のみ取得します。

【書式】

object.FullName

引数・戻り値

object ・・・対象となる Workbook オブジェクトを指定します。

ブックの名前だけを取得するには、Name プロパティ を使用します（ブック・シートの名前を取得・設定（Name プロパティ）を参照）。

Path プロパティ・FullName プロパティ使用例

サンプルVBAソース

　
Sub Sample_BookPath()

    Dim w1 As Workbook, w2 As Workbook

    'ブックを開く
    Set w1 = Workbooks.Open(Filename:="C:\Documents\mybook.xlsx")
    
    '新規ブックを作成（未保存）
    Set w2 = Workbooks.Add
    
    
    'Path プロパティ と FullName プロパティ を取得して表示
    MsgBox "【既存ブック（mybook.xlsx）】" & vbCrLf & _
           "Path プロパティ" & vbTab & " → " & w1.Path & vbCrLf & _
           "FullName プロパティ" & vbTab & " → " & w1.FullName & vbCrLf & _
           vbCrLf & _
           "【新規ブック（未保存）】" & vbCrLf & _
           "Path プロパティ" & vbTab & " → " & w2.Path & vbCrLf & _
           "FullName プロパティ" & vbTab & " → " & w2.FullName
    
    
    'ブックを閉じる
    w1.Close
    w2.Close

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

　

Sub Sample_BookPath()

Dim w1 As Workbook, w2 As Workbook

'ブックを開く

Set w1 = Workbooks.Open(Filename:="C:\Documents\mybook.xlsx")

'新規ブックを作成（未保存）

Set w2 = Workbooks.Add

'Path プロパティと FullName プロパティを取得して表示

MsgBox "【既存ブック（mybook.xlsx）】" & vbCrLf & _

"Path プロパティ" & vbTab & " → " & w1.Path & vbCrLf & _

"FullName プロパティ" & vbTab & " → " & w1.FullName & vbCrLf & _

vbCrLf & _

"【新規ブック（未保存）】" & vbCrLf & _

"Path プロパティ" & vbTab & " → " & w2.Path & vbCrLf & _

"FullName プロパティ" & vbTab & " → " & w2.FullName

'ブックを閉じる

w1.Close

w2.Close

End Sub

　

実行結果

- ブック・シートの操作 FullName プロパティ, Path プロパティ, VBA基本, Workbook オブジェクト, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 新規ブック作成（Add メソッド）

新規にワークブックを作成する Workbooks コレクションの Add メソッ …

: ウィンドウのタイトル（Window.Caption プロパティ）

ウィンドウのタイトル（Caption プロパティ） Windows.Captio …

: 数式を表示（DisplayFormulas プロパティ）

数式を表示（DisplayFormulas プロパティ）セルに数式が入力されて …

: ウィンドウ枠の固定（FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウ枠の固定と解除ウィンドウ枠を固定するには FreezePanes プ …

: アクティブシートを参照する（ActiveSheet プロパティ）

アクティブなワークシートを参照する ActiveSheet プロパティを使用する …

: 印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage

偶数ページに別のヘッダーおよびフッターを設定偶数ページのヘッダーおよびフッター …

: 計算精度を設定する（PrecisionAsDisplayed プロパティ）

PrecisionAsDisplayed プロパティ PrecisionAsDi …

: シートを保護・保護したシートを解除する（Protect メソッド・Unprotect メソッド）

Protect メソッド・Unprotect メソッド Protect メソッド …

: ブックのコピーを保存（SaveCopyAs メソッド）

SaveCopyAs メソッド SaveCopyAs メソッドは、現在開いてい …

: 簡易印刷（PageSetup.Draft プロパティ）

PageSetup.Draft プロパティ PageSetup.Draft プロ …

PREV: ブックの変更が保存されているかを確認する（Saved プロパティ）
NEXT: ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）