Add calculated value from a subform to a form

[ElDonJola]

Hello everybody,

I need some help. Long time ago I was quite good I VBA.. but most of it has gone.
Following problem. I got a form having 5 fields of revenues generated by different payment channels (creditcard, card, online..). In the same form I have embedded 5 subforms, each of them calculating the revenues of the named payment methods.
Now I'd like that access fills in the fields in the main form with the relevant values of the subforms.
Could be by clicking a button on the main field, doing the job, so afterwards I can check if the values seem reasonable.

I tried something but it end up with an error, telling me that it won't find the element:

Private Sub TxtBar_DblClick(Cancel As Integer)
Me![1 UF Cash].Form.SumBar = Me.Bar



DoCmd.RunCommand acCmdSaveRecord
End Sub

Thanks a lot!!

[Welshgasman]

Just refer to the subform controls that hold the totals.

[June7]

What do you mean by 'calculating the revenues' - what are these calcs? Are these subforms bound to tables? If code is behind main form, the expression is backwards.

Me.Bar = Me.[1 UF Cash].Form.SumBar

Strongly advise not to use spaces in naming convention. Also better not to start names with numbers.

[ElDonJola]

Thank you for your post.
The fields in the subforms are referring to queries. Each subform has one field, linked to one query in which dataset is filtered by payment method and generating the sum (Screenshot1). The field in the subform actually just shows the value of the sum (Screenshot 2).
The SF and the form are linked with the ID called "RestaurantID"

I'll change the names according naming convention

[June7]

Really should not be saving aggregate calculations to record, just calculate when needed.

Also, using punctuation/special characters in names is just as bad as spaces.

[kd2017]

+1 to welshgasman's suggestion, that's how I do it. No vba necessary.
http://www.databasedev.co.uk/subform-total.html