Adding a button to a VB form

D

DJ

Very VB novice - have basic form which is being used to fill a database. Need
to add 4 buttons which will be used to determine what type of data is coming
in i.e. question, comment, idea etc.

All work - can see buttons on form but when I select one of them when I run
get TRUE or FALSE in relevant column.

What do I need to do to get text as outlined above?
 
J

JLGWhiz

Part 1:
Button usually refers to command button, but in your case it looks like
either an option button (circle with dot) or a checkbox, since both ot these
types have values of True or False.

Part 2:
Assuming that the "buttons" are option buttons, then you can add code to
them by entering design mode and right clicking the button and then select
"View Code" from the pop up menu. Add code similar to this:

Private Sub OptionButton1_Click()
If Me.OptionButton1.Value = True Then
ActiveSheet.Range("A1") = "Question"
End If
Me.OptionButton1.Value = False
End Sub

You would need to change A1 to the appropriate cell reference, for each
OptionButton and assign the appropriate type of incoming data.

If you are using a command button, then you would not need the If statement.

Private Sub CommandButton1_Click()
ActiveSheet.Range("A1") = "Question"
End If
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top