ブックのパスを取得(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 |
実行結果
関連記事
-
-
ワークシートをアクティブにする・選択する(Activate, Select)
Activate メソッド・Select メソッド Activate メソッドは …
-
-
印刷の倍率(拡大/縮小)(PageSetup.Zoom プロパティ)
PageSetup.Zoom プロパティ PageSetup.Zoom プロパテ …
-
-
ワークシートにクリップボードの内容を貼り付ける(Paste メソッド)
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
背景に画像を表示(SetBackgroundPicture メソッド)
SetBackgroundPicture メソッド SetBackgroundP …
-
-
ブックを参照(Workbooks プロパティ,Windows プロパティ)
アクティブなワークブックを参照 現在使用中のワークブック、複数ある場合は一番手前 …
-
-
白黒印刷(PageSetup.BlackAndWhite プロパティ)
PageSetup.BlackAndWhite プロパティ PageSetup. …
-
-
印刷品質を設定(PageSetup.PrintQuality プロパティ)
PageSetup.PrintQuality プロパティ PageSetup.P …
-
-
画面の上端・左端を設定(ScrollRow プロパティ、ScrollColumn プロパティ)
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
ユーザー設定のビュー(CustomView オブジェクト)
ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …
-
-
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …