Code: Select all
Private Sub Quantity_AfterUpdate()
DoCmd.OpenForm "frmAction", acFormDS
With Me.ActionID
.SetFocus
.SelStart = 0
.SelLength = 0
End With
End Sub
Code: Select all
Private Sub Quantity_AfterUpdate()
DoCmd.OpenForm "frmAction", acFormDS
With Me.ActionID
.SetFocus
.SelStart = 0
.SelLength = 0
End With
End Sub
Code: Select all
Private Sub Quantity_AfterUpdate()
DoCmd.OpenForm "frmAction", acFormDS
DoCmd.OpenForm "frmTrades", acFormDS
With Me.ActionID
.SetFocus
.SelStart = 0
.SelLength = 0
End With
End Sub
[code]