Problem with Checkboxes... Help Required!!!

  • Thread starter Thread starter Alan T
  • Start date Start date
A

Alan T

I have a designed a form in which users will deselect checkbox 31 if the
customer has a product from a certain brand. Users can also deselect
checkbox 32 if the customer has a product from another brand. (It is
possible that customers will have products from both brands).

On another part of the form the user has to select checkbox 41 if the
total value of the customer products (from both brands) is greater than
£15000. At present I have the following coding:-

Private Sub CheckBox41_Click()
If CheckBox41.Value = True Then
Controls("CheckBox44").Enabled = True
Controls("CheckBox44").Value = False
Controls("CheckBox42").Enabled = True
Controls("CheckBox42").Value = False

Else
Controls("CheckBox42").Enabled = False
Controls("CheckBox42").Value = False
Controls("Checkbox44").Enabled = False
Controls("Checkbox44").Value = False
End If

What I'm looking to achieve when checkbox 41 is selected:-

If only Checkbox 31 has also been selected then Checkbox 42 will become
available
If only Checkbox 32 has also been selected then checkbox 44 will become
available
If both Checkbox 31 and 32 have been selected the both checkbox 42 and
44 will become available

Logically the users should work all the way through the form from top
to bottom, however (and I don't know if this is possible) I'd like to
write the coding in such a way, that if a user completed checkbox 41
first then selected with checkbox 31 or 32 it would function in the
same way as if they processed the form in the correct order.
 
Alan,

Put this code in a private procedure on the form

Private Sub CheckCheckBoxes
Checkbox42.Enabled = Checkbox31.Value
Checkbox44.Enabled = Checkbox32.Value
End Sub

and call it from the click event of checkboxes 31,32 and 41.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Bob said:
Alan,

Put this code in a private procedure on the form

Private Sub CheckCheckBoxes
Checkbox42.Enabled = Checkbox31.Value
Checkbox44.Enabled = Checkbox32.Value
End Sub

and call it from the click event of checkboxes 31,32 and 41.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
Click to expand...



Thanks Bob,

I've now been asked to perform the reverse of the original requirement
How do I write the code so Checkbox42 is only enabled when the value i
Checkbox31 is false
 
Alan,

Just change the code to

Checkbox42.Enabled = Not Checkbox31.Value

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

Alan T > said:
Bob said:
Alan,

Put this code in a private procedure on the form

Private Sub CheckCheckBoxes
Checkbox42.Enabled = Checkbox31.Value
Checkbox44.Enabled = Checkbox32.Value
End Sub

and call it from the click event of checkboxes 31,32 and 41.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
Click to expand...



Thanks Bob,

I've now been asked to perform the reverse of the original requirement.
How do I write the code so Checkbox42 is only enabled when the value in
Checkbox31 is false?
Click to expand...
 
Back
Top