Hi everyone,
Can anyone tell me what is wrong with this piece of code?
Private Sub HeaderAcc_Enter()
On Error GoTo Err_HeaderAcc_Enter
Address1.SetFocus
Exit_HeaderAcc_Enter:
Exit Sub
Err_HeaderAcc_Enter:
MsgBox Err.Description
Resume Exit_HeaderAcc_Enter
End Sub
When I tab to the field HeaderAcc the SetFocus statement is immediately actioned, why doesn't it wait for me to press enter?
Can anyone tell me what is wrong with this piece of code?
Private Sub HeaderAcc_Enter()
On Error GoTo Err_HeaderAcc_Enter
Address1.SetFocus
Exit_HeaderAcc_Enter:
Exit Sub
Err_HeaderAcc_Enter:
MsgBox Err.Description
Resume Exit_HeaderAcc_Enter
End Sub
When I tab to the field HeaderAcc the SetFocus statement is immediately actioned, why doesn't it wait for me to press enter?