ブックのパスを取得(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 プロパティ) ウィンドウの表示サイズをパーセン …
-
-
印刷設定(ヘッダーに画像を指定)LeftHeaderPicture, CenterHeaderPicture, RightHeaderPicture
ヘッダーに画像を表示するには LeftHeaderPicture プロパティ、C …
-
-
ブックのファイル形式を調べる(FileFormat プロパティ)
ブックのファイル形式を調べる(FileFormat プロパティ) 指定したブック …
-
-
0 を表示するかどうかを設定(DisplayZeros プロパティ)
DisplayZeros プロパティ DisplayZeros プロパティに、T …
-
-
枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
印刷時、シート内のエラーをどう扱うかを設定(PrintErrors プロパティ)
PageSetup.PrintErrors プロパティ PageSetup.Pr …
-
-
新しいウィンドウを開く(NewWindow メソッド)
NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …
-
-
画面の上端・左端を設定(ScrollRow プロパティ、ScrollColumn プロパティ)
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
ウィンドウを整列(Windows.Arrange メソッド)
ウィンドウを整列(Windows.Arrange メソッド) Windows コ …
-
-
印刷設定(偶数ページのヘッダー・フッターを設定)OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
