D
dhstein
This Code works:
Private Sub cbxFindVendor_LostFocus()
If cbxFindVendor.Visible Then
Me.cbxWeightByVendor.SetFocus
cbxFindVendor.Value = ""
cbxFindVendor.Visible = False
End If
End Sub
This code doesn't work:
Private Sub cbxFindVendor_AfterUpdate()
' ...Other Code here - Dlookups ...
If cbxFindVendor.Visible Then
Me.cbxWeightByVendor.SetFocus
cbxFindVendor.Value = ""
cbxFindVendor.Visible = False
End If
Error is :
Runtime error 2110
Microsoft Office Access can't set the focus to the control cbxWeightByVendor
BTW the control is visible - and never gets hidden
Any ideas are appreciated. Thanks.
Private Sub cbxFindVendor_LostFocus()
If cbxFindVendor.Visible Then
Me.cbxWeightByVendor.SetFocus
cbxFindVendor.Value = ""
cbxFindVendor.Visible = False
End If
End Sub
This code doesn't work:
Private Sub cbxFindVendor_AfterUpdate()
' ...Other Code here - Dlookups ...
If cbxFindVendor.Visible Then
Me.cbxWeightByVendor.SetFocus
cbxFindVendor.Value = ""
cbxFindVendor.Visible = False
End If
Error is :
Runtime error 2110
Microsoft Office Access can't set the focus to the control cbxWeightByVendor
BTW the control is visible - and never gets hidden
Any ideas are appreciated. Thanks.