vba code to change a field based on another field

[jolaunt]

I am trying to create a vba code to tick a box after an update of another box.

I have a yes/no drop down box called 'ResolvedByTelCall'. When 'yes' is selected I want a tick to go in another box called 'Resolved'.

I have tried using the following code which does nothing:

Private Sub ResolvedByTelCall_AfterUpdate()
If Me.ResolvedByTelCall = True Then
Me.Resolved = True
End If
End Sub

I am quite new to this and would appreciate any help!!

Thanks in advance.

[NeoPa]

If you have a Drop Down (or ComboBox) then the chances are the values held will be strings rather than boolean or numeric. Your code compares the value to True (which is a boolean value that is numerically equivalent to -1 - or all 1 bits). The value Yes is True. But the value "Yes" is certainly not. Does that make sense?

Welcome to Bytes!

[jolaunt]

Sorry I am a newbie and a little confused by this.

How do I get around this? Should I change the format of my yes/no box?

Your help is appreciated

[TheSmileyCoder]

Try

Private Sub ResolvedByTelCall_AfterUpdate() 
  If Me.ResolvedByTelCall = "Yes" Then 
    Me.Resolved = True 
  End If 
End Sub 

If that doesn't work, you will need to provide more info on the structure of your drop down (usually referred to as a combobox, since thats what access calls it)

The box you want to "tick" is that a Checkbox bound to a yes/no field?

[jolaunt]

Thank you this worked perfectly! :-)

[NeoPa]

It looks like your ComboBox is populated with string (text) data then. In that case some very simple code should both set and reset it for you :

Private Sub ResolvedByTelCall_AfterUpdate()
  Me.Resolved = (Me.ResolvedByTelCall = "Yes")
End Sub