How to count Option button clicks on same userform?

[danbates]

Hi,

Please can someone help me?

I have a userform called OPTIONS.

I have 6 different options on the userform.

What I would like is if an operator selects an option it counts the number of times that selection has been selected in a textbox on the same userform.

For example:

If OptionButtonADD is selected then an 1 appears in TextBoxADD and if it is selected again then a 2 appears in the relevant textbox and so on.

Once I get the first code for the ADD I will be able to do the rest.

I would like a reset count code as well please to reset all the textboxes.

Any help would much appreciated.

Thanks

Dan

 

[My Aswer Is This]

That's true.

You said:

or close the worksheet

I think you wanted to save close the ​

WorkBook​

​

 

[danbates]

Yeah sorry I meant workbook.

Ok I'll have to go down the other route then but thank you all for all your help.

Much appreciated.

Regards

Dan

 

[My Aswer Is This]

You would need to put these two scripts in your Userform

Private Sub UserForm_Initialize()
TextBox1.Value = Cells(1, 1).Value
End Sub
Private Sub UserForm_Terminate()
Cells(1, 1).Value = TextBox1.Value
End Sub

 

[Yongle]

To maintain the value whilst the workbook is open, consider using a Public variable like this

At TOP of a standard module ABOVE all procedures

Public [COLOR=#ff0000]myCount[/COLOR] As Long

Sub DoSomething()
   xxx
End Sub

UserForm code

Private Sub OptionButtonAdd_Click()
  myCount = myCount + 1
  TextBoxADD = myCount
  OptionButtonAdd.Value = False
End Sub

Private Sub UserForm_Activate()
  TextBoxADD = myCount
End Sub

 

[My Aswer Is This]

Terminate means Unload the sheet.
So put this code also in your Userform in case you hide the sheet and then close the workbook

Private Sub CommandButton1_Click()
Cells(1, 1).Value = TextBox1.Value
Me.Hide
End Sub