Statement Table - Billing Statements in Microsoft Access, Part 3


	Back to Billing Statements 3 Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Statement Table

John Gemayel

2 years ago

Is there a tutorial on how to get this code to insert the StatementID into all child fields in the StatementDetailT? (Currently, when I click the button, it only inserts it into to top row)

Details

Private Sub GenerateStatementBtn_Click()
On Error GoTo errorHandling

    If MsgBox("Are you sure?", vbYesNoCancel) <> vbYes Then Exit Sub

    Me.Filter = "CustomerID=" & CustomerID & ""
    Me.FilterOn = True

    
    DoCmd.OpenForm "StatementAddF"
    DoCmd.GoToRecord acDataForm, "StatementAddF", acNewRec
    
    With Forms!StatementAddF
        !StatementDate = Date
        !CustomerID = CustomerID
        !Notes = "Statement as of " & Date
    End With

    DoCmd.GoToControl "StatementAddFSubform"
   
    
    With Forms!StatementAddF!StatementAddFSubform.Form!
    !StatementID = [Forms]![StatementAddF]![StatementID]
   
    End With
      


DoCmd.SetWarnings False

DoCmd.SetWarnings True
Me.Requery

Exit Sub
errorHandling:
MsgBox Err.Description
   
End Sub

	John Gemayel OP @Reply 2 years ago

	Alex Hedley @Reply 2 years ago
Default Value

	John Gemayel OP @Reply 2 years ago
I tried that but it didn't do anything, I think because StatementAddFSubform opens/loads before StatementAddF. I'll try that again this time while using the above code. Good idea. Thank You

	John Gemayel OP @Reply 2 years ago
If that doesn't work, I think I'll just add buttons to the subform

	Alex Hedley @Reply 2 years ago
Where does the StatementID live?

	John Gemayel OP @Reply 2 years ago
I use an append query to generate a StatementDetailT from Richard's "orderunpaidcustomerQ"(this tutorial). The StatementID doesn't exist until I click on my "Generate Statement" button to open my "AddStatementF" from my CustomerF. Kind of cheesy but I works nicely.

	John Gemayel OP @Reply 2 years ago
This is coming along nicely, thanks to you guys. I'll let you know if the Default Value works in the StatementAddF subform for the StatementDetailT StatementID

	John Gemayel OP @Reply 2 years ago

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Billing Statements 3.

Next Unseen

New Feature: Comment Live View