Check boxes checked

**EGR2317** · 06-04-2010, 01:14 PM

I was just wondering if it was possible to have a user form with check boxes that, after it is closed and reopened, the check boxes are still checked to show what options were chosen by the user. If this is possible, how would someone go about implementing this? I am using Excel 2007 and I don't have an example because it is just something I thought of.

Thanks in advance.

**Marcol** · 06-04-2010, 01:37 PM

One way is to put a value in a spare Cell Toggle the caption with the checkbox value.

When the form is Initialized, set the check box to the Cell value
i.e.

If Sheet1.Range("AA1")= "TRUE" Then
     Checkbox1.Value = True
Else
     Checkbox1.Value = False
End If

Hope this helps.

If you need any further information, please feel free to ask further

However

If this takes care of your needs, please click EDIT in your original post, click GO ADVANCED and set the PREFIX box to SOLVED. It helps everybody!
Also
If you are satisfied by any members response to your problem please consider using the scales icon top right of thier post to show your appreciation.

**EGR2317** · 06-04-2010, 01:41 PM

Thanks, Marcol, but could you explain what your code does, exactly? I'm looking at it and trying to understand, but I could use a little bit of help.

**Marcol** · 06-04-2010, 02:01 PM

Hold that result, I've used that before but it seems like it doesn't work!!!
I'll have to check it out.

Back soon.

**Marcol** · 06-04-2010, 02:24 PM

Silly me of course it does!!!
I forgot how Excel reads "TRUE"/"FALSE"

I have appended a demo workbook for you to try.

The code

Private Sub CheckBox1_Click()
    If CheckBox1 Then
        Sheet1.Range("AA1") = "True"
    Else
        Sheet1.Range("AA1") = "False"
    End If
End Sub

Private Sub UserForm_Activate()
    If Sheet1.Range("AA1") = "True" Then
         CheckBox1.Value = True
    Else
         CheckBox1.Value = False
    End If
End Sub

Is in the UserForm

And in the workbook module

Private Sub Workbook_Open()
    UserForm1.Show
End Sub

Cheers

**EGR2317** · 06-04-2010, 02:27 PM

Thanks Marcol. I think I understand how it works now.

Check boxes checked

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Check boxes checked

Re: Check boxes checked

Re: Check boxes checked

Re: Check boxes checked

Re: Check boxes checked

Re: Check boxes checked

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions