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

関連記事

: 印刷設定（フッターに画像を指定）LeftFooterPicture,CenterFooterPicture,RightFooterPicture

フッターに画像を表示するには LeftFooterPicture プロパティ、C …

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

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

: ワークシートを参照する（Worksheets プロパティ）

Worksheets プロパティ Worksheets プロパティは、Works …

: ブックを参照（Workbooks プロパティ,Windows プロパティ）

アクティブなワークブックを参照現在使用中のワークブック、複数ある場合は一番手前 …

: 白黒印刷（PageSetup.BlackAndWhite プロパティ）

PageSetup.BlackAndWhite プロパティ PageSetup. …

: 行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）

PageSetup.PrintHeadings プロパティ PageSetup. …

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

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

: ブック・シートの名前を取得・設定（Name プロパティ）

ワークブックの名前を取得 Name プロパティで、ワークブックの名前を取得します …

: ユーザー設定のビュー（CustomViews プロパティ）

ユーザー設定のビュー CustomViews コレクションは、ユーザー設定ビュー …

: 印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）

PageSetup.PrintTitleRows プロパティ PageSetup …

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