|
▼neptune さん:
>これに関して、どこまで自分でやって、何がわからないのかが、
>わかるように説明して下さい。
すみません。途中行き詰って、そこからようやく質問が見えてきました。
以下のコードを記述しても、Bookを閉じると、チェックBoxに付けたチェックマークが保持できません。
再度Bookを開いても、チェックを付けた以降は、そのダイアログを開かないようにするには、どうしたら
宜しいでしょうか?
Public chk1 As Variant
Sub Macro1()
If chk1 = False Then
UserForm1.Show
Exit Sub
End If
Macro2
End Sub
Sub Macro2()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=True
End Sub
Private Sub CheckBox1_Click()
chk1 = CheckBox1.Value
End Sub
Private Sub commandbutton1_click()
Macro2
Unload UserForm1
End Sub
|
|