ブックのパスを取得(FullName プロパティ,Path プロパティ)
FullName プロパティ・Path プロパティ
ブックのパス(保存場所)を調べるには、Workbook オブジェクト の Path プロパティ や FullName プロパティ を使用します。
Path プロパティ
ブックのパス(保存先フォルダ)を取得します。通常、パスの最後に「\」はつきません。ただし、ドライブのルートの場合は「\」をつけます(「C:\」「D:\」など)。
保存されていないブックの場合は、空文字(””)を返します。
object.Path
引数・戻り値
- object ・・・ 対象となる Workbook オブジェクトを指定します。
FullName プロパティ
- object ・・・ 対象となる Workbook オブジェクトを指定します。
ブックのパス(保存先フォルダ)と名前を取得します。保存されていないブックの場合は、ブックの名前のみ取得します。
object.FullName
引数・戻り値
- object ・・・ 対象となる Workbook オブジェクトを指定します。
- object ・・・ 対象となる Workbook オブジェクトを指定します。
ブックの名前だけを取得するには、Name プロパティ を使用します( ブック・シートの名前を取得・設定(Name プロパティ) を参照 )。
Path プロパティ・FullName プロパティ 使用例
サンプルVBAソース
|
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 |
実行結果
関連記事
-
-
ウィンドウを拡大・縮小(Zoom プロパティ)
ウィンドウを拡大・縮小(Zoom プロパティ) ウィンドウの表示サイズをパーセン …
-
-
再計算(Calculation, EnableCalculation, Calculate)
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
-
印刷時の改ページ設定(Add,ResetAllPageBreaks)
改ページの追加と解除 印刷時に改ページを指定するには、HPageBreaks コ …
-
-
印刷設定(偶数ページのヘッダー・フッターを設定)OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
ウィンドウのタイトル(Window.Caption プロパティ)
ウィンドウのタイトル(Caption プロパティ) Windows.Captio …
-
-
ブック作成時のシート数の取得・設定(SheetsInNewWorkbook プロパティ)
SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …
-
-
ファイル保存の既定の形式を取得・設定(DefaultSaveFormat プロパティ)
DefaultSaveFormat プロパティ DefaultSaveForma …
-
-
ブックを開く(Open メソッド)
ブックを開く(Open メソッド) ブックを開くには、Workbooks コレク …
-
-
ブックを閉じる(Close メソッド)
ブックを閉じる(Close メソッド) Close メソッド で、ブックを閉じる …
-
-
枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)
PageSetup.PrintGridlines プロパティ PageSetup …
