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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 0 を表示するかどうかを設定（DisplayZeros プロパティ）

DisplayZeros プロパティ DisplayZeros プロパティに、T …

: ウィンドウの状態を取得・設定（WindowState プロパティ）

ウィンドウの状態を取得・設定（WindowState プロパティ） Window …

: ウィンドウの位置を入れ替える（ActivatePrevious メソッド、ActivateNext メソッド）

ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …

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

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

: イベントの発生・無効をコントロール（EnableEvents プロパティ）

EnableEvents プロパティ EnableEvents プロパティに T …

: 印刷設定（ヘッダー・フッターに画像を設定）Graphic オブジェクト

Graphic オブジェクト Graphic オブジェクトは、ヘッダーおよびフ …

: 印刷の倍率（拡大／縮小）（PageSetup.Zoom プロパティ）

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

: 選択されているシートを参照する（SelectedSheets プロパティ）

SelectedSheets プロパティ選択されているすべてのシートをあらわす …

: 最近使用したファイル（RecentFile オブジェクト,RecentFiles コレクション）

最近使用したファイル（RecentFile オブジェクト,RecentFiles …

: 印刷のページ区切り（DisplayPageBreaks プロパティ）

DisplayPageBreaks プロパティ印刷したあとや印刷プレビューを表 …

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