|
▼Kein さん:
>Worksheet_Activate イベントで設定、Worksheet_Deactivate イベントで解除、
>というようにすれば、それを入れたシートのみでの処理になりますが。
keinさんありがとうございました。
他のExcelシートを開くとやはり、同じ状態でツールバーが設定されてしまいます。
Worksheet_Activateの設定が間違っていますでしょうか・・・。
各利用者ごとにツールバーの設定が異なるため、その情報を取得しておいて、
シートを閉じたときに設定を戻す必要があるのでしょうか。
Sub Worksheet_Activate()
Application.CommandBars("toolbar").Visible = True
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Watch Window").Visible = False
Application.CommandBars("3-D Settings").Visible = False
End Sub
Sub Worksheet_Deactivate()
Application.CommandBars("toolbar").Visible = False
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Watch Window").Visible = True
Application.CommandBars("3-D Settings").Visible = True
End Sub
|
|