|
>できれば、マクロを無効にして立ち上げた場合はファイルオープンできないように
>する事も考えています。
Sheet1をダミーのように使います。
保存時にSheet1以外を非表示にします。
次回開くときマクロを有効にしないと表示されません。
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim i As Worksheet
For Each i In Sheets
If Not i.Name = "Sheet1" Then
i.Visible = xlSheetVeryHidden
End If
Next i
Me.Save
End Sub
Private Sub Workbook_Open()
Dim i As Worksheet
For Each i In Me.Worksheets
i.Visible = xlSheetVisible
Next i
End Sub
−−−−−−−−−−−−−−−−−−−−−−−−−−−
もしくは、シートタブから「Excel4.0マクロ」シートを追加して使います。
このシートはマクロが有効でないと表示されません。
|
|