VBA code to fill field.

[Perfac]

I have a query q01Bankbranch and form f02BankBranch. There is a checkbox named Check02. There is a field LdgAcc_ID01. This field is from another table, and shared by 6 other tables. I assume I can't do an expression, so I need VBA code. I want the field LdgAcc01_ID01 to return If Check02 is True then 77 otherwise 80. I tried



Private Sub Form_BeforeUpdate(Cancel As Integer)
Me!LdgAcc_ID01 = IIf(Check02.Value = True, 77, 80)
End Sub

[pbaldy]

You tried that and...what? Incorrect result, error message, etc? Are both of those controls/fields on the form, and is the form updateable?

[Micron]

Agreed, more info. But...
if you open a form that has checkboxes and one of them appears to be filled (black in 2016, blue in earlier versions) then open the vb editor. In the immediate pane, type
?forms!NameOfYourForm.NameOfYourCheckbox and hit return (this is for the filled checkbox, no other). Your result should be Null. In that case, it is neither True or False. This seems to be the case even if the triple state property of the check is False. Hate to admit, but not sure why. Will have to read up on it.

Anyway, point being that assuming no issue as described by Paul, that could be your problem. If so, wrap the expression in Nz, or handle the null some other way.

[Perfac]

Hi. Sorry that code is working.

[pbaldy]

I'd be happy it's working, not sorry.