|
▼わさび さん:
こんばんは。
>
>今、2枚あるシートの行列番号を
>下記のコードで非表示にするところまでは確認できております。
>----------
> ThisWorkbook.Worksheets("Sheet1").Activate
> ActiveWindow.DisplayHeadings = False
> ThisWorkbook.Worksheets("Sheet2").Activate
> ActiveWindow.DisplayHeadings = False
>----------
>
>このとき、シートをいちいちアクティブにしないでも
>行列番号を非表示にすることはできないでしょうか。
いちいちではなく、一度に選択してしまうのはいかがでしょうか?
'==========================================
Sub test()
Set sht = ActiveSheet
Worksheets(Array("sheet1", "sheet2")).Select
ActiveWindow.DisplayHeadings = false
sht.Select
End Sub
確認してください。
|
|