Command Button ?

[Guest]

When I click on my command button, this is
the code that is run.

Private Sub Command85_Click()
DoCmd.GoToRecord , , acNewRec
Me.RunNumber = Nz(DMax("[RunNumber]", "ABLE_Table1", "[RunDate]=Date()"), 0)
+ 1
Me.Dirty = False
End Sub

After I click, the next record comes up ready for input, however,
the command button is still highlighted.

I need it to tab stop on the first control of that next record

Tom

 

[Guest]

Just set the focus to the control you want. See addition to code below:

 

[Guest]

Klatuu,

Got a compile error:

"Method or data member not found"

the highlighted text is ".MyFirstControl"
I'm assuming I replace "MyFirstControl" with the
name of the field that I should see the Cursor flashing, in this case
"CallTime".
However, when I do that, it gives me the same message.

"Method or data member not found"

the highlighted text is ".CallTime"

p.s. the tab stop on "CallTime" is set to "0"

Tom

Just set the focus to the control you want. See addition to code below:

When I click on my command button, this is
the code that is run.

Private Sub Command85_Click()
DoCmd.GoToRecord , , acNewRec
Me.RunNumber = Nz(DMax("[RunNumber]", "ABLE_Table1", "[RunDate]=Date()"), 0)
+ 1
Me.Dirty = False Me.MyFirstControl.SetFocus
End Sub

After I click, the next record comes up ready for input, however,
the command button is still highlighted.

I need it to tab stop on the first control of that next record

Tom

 

[Guest]

What the tab stop says doesn't matter. As long as the control is enabled it
should be able to receive the focus. Assuming the control is on the current
form, the syntax should be:

Me.CallTime.SetFocus

Klatuu,

Got a compile error:

"Method or data member not found"

the highlighted text is ".MyFirstControl"
I'm assuming I replace "MyFirstControl" with the
name of the field that I should see the Cursor flashing, in this case
"CallTime".
However, when I do that, it gives me the same message.

"Method or data member not found"

the highlighted text is ".CallTime"

p.s. the tab stop on "CallTime" is set to "0"

Tom

Just set the focus to the control you want. See addition to code below:

When I click on my command button, this is
the code that is run.

Private Sub Command85_Click()
DoCmd.GoToRecord , , acNewRec
Me.RunNumber = Nz(DMax("[RunNumber]", "ABLE_Table1", "[RunDate]=Date()"), 0)
+ 1
Me.Dirty = False Me.MyFirstControl.SetFocus
End Sub

After I click, the next record comes up ready for input, however,
the command button is still highlighted.

I need it to tab stop on the first control of that next record

Tom