Returning to all previous forms

[GuruCool12221]

Hello guys,
In my project, I have a form named frmDetails which can be accessed by a number of forms like frmAdmin, frmStaff etc. My problem is I want to return to the previous form (may be frmAdmin or frmStaff) from which I accessed frmDetails.
For this, I want to put a button btnBack on the form frmDetails.
Thank you in advance :)

[PhilOfWalton]

I presume you have a command button on your frmAdmin, frmStaff etc. to open FrmDetails.

So the code for the command button should be

Private Sub CmdOpenDetails_Click()
 
    DoCmd.OpenForm "FrmDetails", , , , , , Me.Name
 
End Sub
 

This passes the name of the calling form (FrmAdmin or FrmStaff) to the FrmDetail.

The relevant code in the FrmDetails is

Option Compare Database
Option Explicit
 
Dim Args As String
 
Private Sub Form_Open(Cancel As Integer)
 
    Args = Me.OpenArgs
 
End Sub
 
Private Sub Form_Close()
 
    DoCmd.OpenForm Args
 
End Sub
 

So on opening the FrmDetails, it gets passed the information of the calling form, and on closing the FrmDetails it opens the name it was passed.

Phil

[GuruCool12221]

Thank you. That was short and to the point.
It works fantastic with the scenario I provided earlier. But, when I want to link frmAdmin and frmStaff (going back to each other), it always tells me "Invalid use of null" and the statement Args = Me.OpenArgs is highlighted. I wrote the following code. Please correct me where I am going the wrong way.

Option Compare Database
Option Explicit
Dim Args As String
 
Private Sub goToStaff_Click()
DoCmd.OpenForm "FrmStaff", , , , , , Me.Name
 
End Sub
 
Private Sub goTodetai_Click()
 DoCmd.OpenForm "FrmDetails", , , , , , Me.Name
End Sub
 
Private Sub Form_Open(Cancel As Integer)
 
    Args = Me.OpenArgs
 
End Sub
 
Private Sub Form_Close()
 
    DoCmd.OpenForm Args
 
End Sub

[PhilOfWalton]

Very odd

I must confess that it should say

Args = Nz(Me.OpenArgs)
 

I am at a loss to know why it isn't working......

I Know

The

Private Sub Form_Open(Cancel As Integer)
 
    Args = Nz(Me.OpenArgs)
 
End Sub
 

Should be the open event on both the FrmDetails and FrmStaff. That way, you "Pass" the name of the calling form to te form being opened.

Equally the Close event should be on both the FrmDetails and FrmStaff. Here you open the form whose name has been passed to it when you opened the form.

I have a feeling that all the code is on your main form

Phil

[NeoPa]

In short, all Forms that you open with this method should have the code in their Form_Open() & Form_Close() event procedures to handle the Args string value and any form that is opening another form (or report indeed) should have the code that passes its name in the OpenArgs parameter.

I would actually do it slightly differently, as I tend simply to hide and unhide the form that opens another one. So, if frmA is the form that's open to start with, and it calls frmB, then the code would be as below :
frmA

Option Compare Database
Option Explicit
 
Private Sub cmdOpenB_Click()
    Call DoCmd.OpenForm(FormName:="frmB", OpenArgs:=Me.Name)
End Sub

frmB

Option Compare Database
Option Explicit
 
Private strCaller As String
 
Private Sub Form_Open(Cancel As Integer)
    strCaller = Nz(Me.OpenArgs, "")
    If strCaller > "" Then Forms(strCaller).Visible = False
End Sub
 
Private Sub Form_Close()
    If strCaller > "" Then Forms(strCaller).Visible = True
End Sub

Notice, with the hiding code being in the called form, the calling form doesn't have to know if the called form has been coded to handle hiding or not. As long as each form has either no code or both sets of code (In Form_Open() as well as Form_Close()) then it will work consistently. Equally, when a called form is opened directly from the database window, it won't have any issues trying to make the calling form visible again.

NB. Hiding is preferable in most cases as it doesn't lose any of its settings and won't need to get the data again if it has any. It also won't need to go through the opening sequence. That last bit's usually insignificant but unnecessary is unnecessary ;-) Also consider a form used for filtering that opens a selected item. When you return to that form you generally prefer the same criteria to be set in order to allow you to continue seamlessly.

[GuruCool12221]

Thank you so much guys. my problem is solved with the Nz command. thank you for your time and effort