You could just open the date picker form and then put the rest of the script into the on close event of the date picker form.

Hi Adam,

Thanks for the reply, I am currently trying that approach.. but running into problems because I need to get a handful of variables that were from the first form into the script on the datepicker form.

if it is helpful.. here is my code :

Private Sub btnToggleStatus_Click() 'updated the IssueStatus, ResolvedDate, and Issue Notes for the current Issue

Dim CurrentID As Integer 'ID of the current issue from tblEventElementIssue
Dim i As Integer ' value in the IssueStatus field
Dim tLU As Integer 'lookup the ID from tblType that the typename matches "Unresolved"
Dim tLR As Integer 'lookup the ID from tblType that the typename matches "Resolved"
Dim User As String ' Username for use in updating notes
Dim Status As String ' lookup of TypeName based on the ID stored in IssueStatus
Dim R As Integer ' Current Record
Dim rD As Date ' resolved date
Dim t As String ' issue name from qry


CurrentID = txtEventElementIssueID.Value
R = Me.CurrentRecord
tLU = Nz(DLookup("TypeID", "tblType", "TypeName='Unresolved'"), "")
tLR = Nz(DLookup("TypeID", "tblType", "TypeName='Resolved'"), "")
User = wsGetUserName() & " Updated Status to: "
rD = [Forms]![frmShowReport]![EventDate] ' sets rd to the date of the currently selected event day
t = title.Value


    If IssueStatus.Value = tLU Or IsNull(IssueStatus) Then
        If MsgBox("Please confirm that the Issue: " & vbCrLf & t & vbCrLf & "Was resolved on: " & Format(rD, "dddd dd-mmm-yy") & vbCrLf & vbCrLf & "Choose ""NO""" & " to choose another Date", vbYesNo, "Important!") = Yes Then
            
        IssueStatus.Value = tLR
        i = Nz(IssueStatus.Value, 0)
        ResolvedDate.Value = rD
        ResolvedBy.Value = wsGetUserName()
        
        Status = DLookup("TypeName", "tblType", "TypeID=" & i)
        
        CurrentDb.Execute "INSERT INTO tblEventElementIssueNotes (EventElementIssueID, NoteText, CreatedBy) " & _
            "VALUES (""" & CurrentID & """,""" & User & Status & """, """ & wsGetUserName & """)"
            
        Else
        
        DoCmd.OpenForm "frmResolvedDatePicker"
        
        'in this instance, the IssueStatus and Issue Notes need to be updated after the date has been picked by the user and Confirmed via
        'frmResolvedDatePicker btnDateConfirm
        
        Exit Sub
            
        End If
            
   ElseIf IssueStatus.Value = tLR Then
  
        IssueStatus.Value = tLU
        i = Nz(IssueStatus.Value, 0)
        ResolvedDate.Value = rD
        ResolvedBy.Value = wsGetUserName()
        
        Status = DLookup("TypeName", "tblType", "TypeID=" & i)
        
        CurrentDb.Execute "INSERT INTO tblEventElementIssueNotes (EventElementIssueID, NoteText, CreatedBy) " & _
            "VALUES (""" & CurrentID & """,""" & User & Status & """, """ & wsGetUserName & """)"
  
  
   End If
  
    Me.Requery
    DoCmd.GoToRecord , , acGoTo, R
    If CurrentProject.AllForms("frmShowReport").IsLoaded Then
    Forms![frmShowReport]![frmUnresolvedtIssueList].Requery
    End If
    
    If CurrentProject.AllForms("frmIssueList").IsLoaded Then
    Forms![frmIssueList].Requery
    End If
    
End Sub

what I am trying to do is in the "else" section of the msgbox if statement..
is esentially this block of code :
  IssueStatus.Value = tLR
        i = Nz(IssueStatus.Value, 0)
        ResolvedDate.Value = rD
        ResolvedBy.Value = wsGetUserName()

where rD = a date that is picked by the user.

This may not be the best approach, but I've run into a similar problem...I had a generic payment form open that can be called from several different forms.  I wanted the form that called it to wait for the user to submit a payment before continuing on with the script in the original form.  I used TempVars to pass variables between the forms.  To make the original procedure wait for input, i used the following:

Do Until Not CurrentProject.AllForms("NameOfForm").IsLoaded
    Do Events
Loop

That had the procedure wait for the payment form to be closed by the user before it continued on, and i used TempVars to pass information to and from the Payment form.

Hi Jeffery, thanks for the reply. this is just what I needed! except instead of using TempVars, I had the date picker form set a global variable that I could then pick up from the original form.

Glad I could help!  Personally, I prefer TempVars over global variables only because if you have an unhandled error, a global variable may lose its value.  But that's just my opinion.  :)