ワークブックを非表示で開きたい
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
注意点
- 特にありません。
コメント