I've written the code below to be activated when a command button is clicked on a form:
Private Sub Command0_Click()
Dim rst As Recordset
Dim formholder As Variant
Dim multi As Long
Set formholder = Form![frmaccrual_vendor_invoice]
Set rst = formholder.RecordsetClone
multi = Form![frmaccrual_vendor_invoice]![StateTax] + Form![frmaccrual_vendor_invoice]![CityTax] + _
Form![frmaccrual_vendor_invoice]![MTA Tax] + Form![frmaccrual_vendor_invoice]![StateTax]
rst.MoveFirst
While Not rst.EOF
Form![frmaccrual_vendor_invoice]![StateTax] = Me![Text1]
Form![frmaccrual_vendor_invoice]![CityTax] = Me![Text2]
Form![frmaccrual_vendor_invoice]![MTATax] = Me![Text4]
Form![frmaccrual_vendor_invoice]![StateTax] = Me![Text6]
Form![frmaccrual_vendor_invoice]![TaxAmt] = multi * Form![frmaccrual_vendor_invoice]![TaxableAmt]
rst.MoveNext
Wend
End Sub
Execution stops at the 5th line of code and I get the message "MS Access cannot find the field 'frmaccrual_vendor_invoice'. "frmaccrual_vendor_invoice" is not a field but a form.
I can't figure out what I'm doing wrong. Can someone help?
Robin
Private Sub Command0_Click()
Dim rst As Recordset
Dim formholder As Variant
Dim multi As Long
Set formholder = Form![frmaccrual_vendor_invoice]
Set rst = formholder.RecordsetClone
multi = Form![frmaccrual_vendor_invoice]![StateTax] + Form![frmaccrual_vendor_invoice]![CityTax] + _
Form![frmaccrual_vendor_invoice]![MTA Tax] + Form![frmaccrual_vendor_invoice]![StateTax]
rst.MoveFirst
While Not rst.EOF
Form![frmaccrual_vendor_invoice]![StateTax] = Me![Text1]
Form![frmaccrual_vendor_invoice]![CityTax] = Me![Text2]
Form![frmaccrual_vendor_invoice]![MTATax] = Me![Text4]
Form![frmaccrual_vendor_invoice]![StateTax] = Me![Text6]
Form![frmaccrual_vendor_invoice]![TaxAmt] = multi * Form![frmaccrual_vendor_invoice]![TaxableAmt]
rst.MoveNext
Wend
End Sub
Execution stops at the 5th line of code and I get the message "MS Access cannot find the field 'frmaccrual_vendor_invoice'. "frmaccrual_vendor_invoice" is not a field but a form.
I can't figure out what I'm doing wrong. Can someone help?
Robin