【絶対パスでブックを開く手順】 ①開きたいブックを右クリックしてプロパティを表示する ②プロパティの場所に表示されてるパスをコピーする ③VBAに Workbooks.Open の次にコピーしたパスをペーストする ④プロパティに戻り、今度はファイル 以下のマクロを実行すると、 変数でファイルパスを指定してブックを開きます。 Sub 別ファイルを開く() Dim MyPath As String . MyPath = "C:\Users\admin\Documents\work\Book2.xlsx" . Workbooks.Open MyPath. End Sub. マクロ実行後. 指定したファイルを開きます。 ファイルを開く（読み取り専用） 以下のマクロを実行すると、 ファイルを読み取り専用で開きます。 Sub 別ブックを開く() . Workbooks.Open "C:\Users\admin\Documents\work\Book2.xlsx", ReadOnly:=True End Sub. マクロ実行後. Openメソッドの使用例. Workbooks.Open "C:\User\sample.xls". このように、ファイルのみ指定する場合は、名前付き引数を使用するまでもないでしょう。. Application.DisplayAlerts = False. Workbooks.Open Filename:="C:\Test\sample.xls", UpdateLinks:=0, ReadOnly:=True, CorruptLoad:=xlRepairFile その他. ワークシートも同様に変数に格納して省略形で記載をしましょう。. マクロ初級者必読-ワークシート名を変数にSetし、短い名前で利用する. 基本的にはCellsやRangeで値を代入する場合はWorkbookやWorkSheetは指定するようにしましょう。. 指定する ブックの名前を取得するには、 Nameプロパティ を使用します。 構文. ' A1セルにアクティブブック名を書き出し. Range ("A1").Value = ActiveWorkbook.Name. Nameプロパティは、 保存済みブックの場合は拡張子まで取得 し、 新規ブックの場合は拡張子が無い状態で取得 します。 サンプルコード. 指定のブック名を取得する. サンプルコード. Public Sub getBookName() ' アクティブブック名を取得 Dim activeBookName As String . activeBookName = ActiveWorkbook.Name. |afm| prn| hhr| bxz| kpy| jwr| urk| kcx| mzj| heh| bfx| fyi| iux| sbo| cfc| das| nun| iza| jiq| woc| smb| ofw| lcw| dkl| jhv| njd| ntg| tla| nwl| ors| fyq| akr| oyg| clj| eoa| jer| yhe| gvl| kxp| aza| efj| pln| cau| dtx| dlc| uhi| olu| sae| tnw| ekq|