If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Auto Fill Text Box After Transferring Forms
First time asking a question...
I'm having difficulty having a date auto-populate when specifically transferring from one form to the another. I do not want the date to auto-populate every time this form is opened, only when transferred from this particular form. Is this possible? Currently this is what my code looks like: Private Sub Correct_AP20_Click() On Error GoTo Err_Correct_AP20_Click Me!Corrected_Process = "AP20.3" Me!Resolved = True Me!Audited = True Me!Resolved_Date = FormatDateTime(Now(), 2) DoCmd.GoToRecord , , acNewRec, DataEntry DoCmd.Close Dim stDocName As String Dim stLinkCriteria As String stDocName = "frmAP20point3" DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_Correct_AP20_Click: Exit Sub Err_Correct_AP20_Click: MsgBox Err.Description Resume Exit_Correct_AP20_Click When the AP20.3 screen opens I would like it to add today's date to a field called: Corrected_Date Is this possible? |
Thread Tools | |
Display Modes | |
|
|