SetFocus on last added form control in subform

[faythe1215]

A button on my form adds a new record onto my subform. Once the new record is added, I'd like to SetFocus onto a specific field on that subform.

Private Sub btnAddIngredientRec_Click()
    Dim RecNum As Integer
    RecNum = Me.CurrentRecord
    
    AddIng (RecNum)
    Forms!frmRecipes.SetFocus
    Me.Refresh

'   Here is where I'd like to execute some sort of SetFocus code

End Sub

Private Sub AddIng(RecNum As Integer)
    DoCmd.OpenForm "frmIngredients"
    Forms!frmIngredients.AllowAdditions = True
    DoCmd.GoToRecord , , acNewRec
        ' Link to tbl1Recipe
    Forms!frmIngredients!txtRecipeID = RecNum
        ' Set to Dummy Value
    Forms!frmIngredients!cmbIngredientName = 100
    Forms!frmIngredients.AllowAdditions = False
    DoCmd.Close
End Sub

Also, for my own clarification, what's the difference between ! and . when accessing different controls?

[June7]

The . in VBA will invoke the intellisense popup tips.

Is the code behind the main form? Give the subform container a name different from the object it holds, like: ctrDetails

Me.ctrDetails.Form.controlname.SetFocus

[faythe1215]

The . in VBA will invoke the intellisense popup tips.

Is the code behind the main form? Give the subform container a name different from the object it holds, like: ctrDetails

Me.ctrDetails.Form.controlname.SetFocus

Yes, the code is behind the main form. I renamed the subform container subfrmIngredients. txtIngredientAmt is the control name on my subform.

It did not work.

Private Sub btnAddIngredientRec_Click()
    Dim RecNum As Integer
    RecNum = Me.CurrentRecord
    
    AddIng (RecNum)
    Forms!frmRecipes.SetFocus
    Me.Refresh
    Me.subfrmIngredients.Form.txtIngredientAmt.SetFocus
End Sub

[June7]

What does 'did not work' mean - error message, wrong results, nothing happened?

The technique works for me. If you want to provide db for analysis, follow instructions at bottom of my post.

[faythe1215]

I'm having trouble with the frmRecipesand the code behind it.

[June7]

frmRecipes opens from the navigation pane completely blank except for label in form header. Can't do anything. What steps should I follow to reproduce the issue?

[faythe1215]

I tried to make it smaller by deleting some of the data, and it's causing problems. I am having trouble making the files small enough to attach.

[June7]

Only need a few records. 2MB zip allowed. You attached only 124KB.

[faythe1215]

Here's the DB

[June7]

frmRecipes now shows data but no buttons.

Describe steps to recreate the issue.

[faythe1215]

Open frmRecipes.
Click Add button (which shows on mine).
Click Add Ingredient to Recipe << this is the button I am trying to "fix".

The functionality is there, but I am wondering if there's a way to SetFocus on the first field of the last record added.

[June7]

I looked at bottom of form. Nothing there. I changed the db to Overlapping Windows and now I see the complete form.

Try:

Me.subfrmIngredients.SetFocus
DoCmd.GoToRecord , , acLast

[faythe1215]

Perfect! Thank you!