Screen.PreviousControl property (Access)
You can use the PreviousControl property together with the Screen object to return a reference to the control that last received the focus. Read-only.
expression A variable that represents a Screen object.
The PreviousControl property contains a reference to the control that last had the focus. After you establish a reference to the control, you can access all the properties and methods of the control.
You can't use the PreviousControl property until more than one control on any form has received the focus after a form is opened. Microsoft Access generates an error if you attempt to use this property when only one control on a form has received the focus.
The following example displays a message if the control that last received the focus wasn't the txtFinalEntry text box.
Public Function ProcessData() As Integer ' No previous control error. Const conNoPreviousControl = 2483 Dim ctlPrevious As Control On Error GoTo Process_Err Set ctlPrevious = Screen.PreviousControl If ctlPrevious.Name = "txtFinalEntry" Then ' ' Process Data Here. ' ProcessData = True Else ' Set focus to txtFinalEntry and display message. Me!txtFinalEntry.SetFocus MsgBox "Please enter a value here." ProcessData = False End If Process_Exit: Set ctlPrevious = Nothing Exit Function Process_Err: If Err = conNoPreviousControl Then Me!txtFinalEntry.SetFocus MsgBox "Please enter a value to process.", vbInformation ProcessData = False End If Resume Process_Exit End Function
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.