Using Null with Marco

[wes9659]

I am some issue on my use of null value. What I would like to do is using the even “On Exit” from a field in this case “SecondaryContactName” which is a short text field. What I would like is if the field is left empty I want it to go to field named “ServiceType1”
I created the macro in Photo1 but it does not work correctly. Photo2 shows form and where I want it to jump to. Once again thanks all for the help
.

[pbaldy]

Try

If Nz(FieldName, "") = "" Then

[wes9659]

Hi pbaldy, I tried to follow what you said and received a Parse the expression error. See attached photos am I not entering it right?. Thank you for all your help as well as everyone else here. First Photo shows help that pop up and second shows the error

[ssanfu]

I don't (read *Never*) use macros, but I would suggest trying:

Nz(FieldName, "")

I think, but I could be wrong, the macro will not know what to do with the "IF" or the "THEN"

[pbaldy]

I don't use macros either, but that appears correct Steve.

[wes9659]

That does not do it exactly ssanfu it does move it but also moves it there when something in field and it makes program not work quite right.
How would you recommend writing the action In VBA code?
Basically once I Exit Field Named SecondaryContactName if field is Null I want to go to field named ServiceType1 and continue on from there. If SecondaryContactName field contains data I want it to continue on to next corresponding field. It’s the Null value that is throwing me for a loop. Thanks everyone for your help and support. I truly appreciate it.

[wes9659]

Do I need to Write another if statement in regards to If it is not null than go to the next record? I assume VBA would be best choice but not quite sure on implementation as I previously post. Thank you

[pbaldy]

In VBA I'd use

If Len(Me.ControlName & vbNullString) = 0 Then

[ssanfu]

This is how I would write the VBA:

Private Sub SecondaryContactName_Exit(Cancel As Integer)
    If Len(Me.SecondaryContactName & vbNullString) = 0 Then
        Me.servicetype1.SetFocus
    End If
End Sub