| |
ウインドウズxp,エクセル2007を使用しています。
before close イベントで、以下のようなマクロを設定しています。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Columns("H:J").Select
Selection.EntireColumn.Hidden = True
ActiveSheet.Protect Password:="111", DrawingObjects:=True, contents:=True, UserInterfaceOnly:=True
End Sub
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
シートが゛複数ある場合、
アクティブになっていないシートは、
H:J列が開いたまま終了されてしまいます。
アクティブになっていないシートにも、
上記のマクロが働いて、終了できるようにしたいのです。
過去ログにも同様の質問があり、参考にしましたが、
イベントではどのようにcallして良いのか分からず、
上手く行きません。
どうぞ宜しくご教示のほど、御願いいたします。
|
|
みるく
- 10/6/24(木) 21:58 -
