I had genrated a "UserForm" with some "CheckBox". Now I would like to save
the document with some check mark's (true, on) but always when I open again
the document there are no check marks visible.

Here is the code that I use:

Private Sub CheckBox1_Click()
Sheets("test").Activate
If CheckBox1.Value = True Then
Range("12:12, 18:18, 33:33").EntireRow.Hidden = False
Else
Range("12:12, 18:18, 33:33").EntireRow.Hidden = True
End If
End Sub





Thenks in advance!