VBATips

ワークブックを非表示で開く【Visibleプロパティ】【ExcelVBA】

ワークブックを非表示で開きたい

Workbooks.Openでワークブックを開く際、意図しない変更が発生しないよう、
ブックを非表示で開きたいケースがあります。

Workbooks.Openで指定する際、ReadOnlyのように引数指定であればいいのですが、
非表示設定の引数はない為、開いた後にVisibleをFalseにします。

ワークブックを非表示で開くサンプルコード

Public Sub sample()
    '■sample.xlsxを非表示で開いて、ブックを非表示にする
    Workbooks.Open "C:\vba\sample.xlsx"
    ActiveWindow.Visible = False

    '■sample.xlsxを非表示で開いて、且つ変数wbに代入する→その後非表示にする
    Dim wb As Workbook
    Set wb = Workbooks.Open("C:\vba\sample.xlsx")
    Application.Windows(wb.Name).Visible = False
End Sub

注意点

  • 特にありません。

関連記事

コメント

タイトルとURLをコピーしました