Unanswered: SetFocus doesn't want to "Set the Focus"
Am I missing something here? Per the code below, I am asking the form to check for a duplicate Tote number and if found, clear certain fields, move back to the first data field [1Tote] and then hide and open a warning form. Problem is, it won't move back from [1Seal] to [1Tote], no matter where in the code I place the command. Any suggestions?
Private Sub Ctl1Tote_AfterUpdate()
If SkipTestSeals = False Then
SMLCheck.Value = [1Tote]
If DCount("[ToteNumber]", "RTVCageSMLCheck", "[ToteNumber]= Forms![RTV Pallet Build]![SMLCheck]") = 0 Then
[1Tote].Value = Null
SMLCheck.Value = Null
Forms![RTV Pallet Build].Visible = False
DoCmd.OpenForm "RTV Tote Scan Twice or Not"