ブックのパスを取得(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 |
実行結果
関連記事
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
-
-
再計算(Calculation, EnableCalculation, Calculate)
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
-
ブックの表示・非表示(Visible プロパティ)
ブック表示・非表示(Visible プロパティ) ブック(ウィンドウ)が表示され …
-
-
印刷・印刷プレビュー(PrintOut メソッド、PrintPreview メソッド)
PrintOut メソッド 印刷するには、PrintOut メソッド を使用しま …
-
-
印刷のページ区切り(DisplayPageBreaks プロパティ)
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
ブックを開く(Open メソッド)
ブックを開く(Open メソッド) ブックを開くには、Workbooks コレク …
-
-
印刷時のページの番号付けの方向を設定(PageSetup.Order プロパティ)
PageSetup.Order プロパティ PageSetup.Order プロ …
-
-
ウィンドウを拡大・縮小(Zoom プロパティ)
ウィンドウを拡大・縮小(Zoom プロパティ) ウィンドウの表示サイズをパーセン …
-
-
シートを保護・保護したシートを解除する(Protect メソッド・Unprotect メソッド)
Protect メソッド・Unprotect メソッド Protect メソッド …
-
-
印刷のタイトル行、タイトル列を設定(PrintTitleRows,PrintTitleColumns)
PageSetup.PrintTitleRows プロパティ PageSetup …
