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

関連記事

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

PageSetup.BlackAndWhite プロパティ PageSetup. …

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

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

: 印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）

PageSetup.PaperSize プロパティ PageSetup.Pape …

: ワークシートのコピー・移動（Copy メソッド Move メソッド）

Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …

: 指定された情報をブックから削除（RemoveDocumentInformation メソッド）

RemoveDocumentInformation メソッド指定された種類の情 …

: 数式バーの設定（DisplayFormulaBar, FormulaBarHeight）

数式バーの設定数式バーの表示・非表示の設定を行うには、DisplayFormu …

: ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）

DefaultSaveFormat プロパティ DefaultSaveForma …

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

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

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

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

: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する余白を設定する単位は、pt（ポイント：約 0.03528 cm） …

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