サイトについて      連絡先   検索

VBA Workbook [ワークブック] を開く

はじめに

Excel VBA の Workbook (ワークブック) を開く方法を紹介します。

Workbooks.Open メソッドで Workbook を開けます。

Workbook (ワークブック) を開く

Workbook を開くには Workbooks.Open("フルパス") のように指定します。

Workbooks.Open("C:\Book1.xlsx") ' Workbook を開く

開いた Workbook はアクティブになります。

マクロを実行している Workbook をアクティブにしたいなら ThisWorkbook をアクティブにします。

Workbooks.Open("C:\Book1.xlsx") ' Workbook を開く
ThisWorkbook.Activate

指定したファイルが存在しないときはエラーが発生します。

ファイルを開くダイアログを表示する

Application.GetOpenFilename メソッドでファイルを開くダイアログを表示できます。

戻り値に指定したフルパスが返ります。キャンセルすると "False" が返ります。

1
Dim fileName As String
fileName = Application.GetOpenFilename ' ダイアログを表示

If fileName = "False" Then
    ' キャンセル
    Exif Sub
End If

' 開く
Workbooks.Open(fileName) ' Workbook を開く

開いた Workbook (ワークブック) を編集する

Open の戻り値から開いた Workbook を取得できます。開いた Workbook を編集したいときは、それに対して操作します。

Dim wb As Workbook
Set wb = Workbooks.Open("C:\Book1.xlsx") ' Workbook を開く

' 編集
wb.Sheets(1).Range("A1").Value = "編集"

関連ページ