Sum specific values on subform and place result on another subform.

[projectpupil7]

Hi All, i know this may be breaking rules on db design but this needs to be.



The forms in the code are subforms on a TabControl on a main form.

I have this code which needs to add together only the areas [Area] of records with a FloorNumber field value of 1 or 2 or 3 or 4.

At the moment the code works for one entry of 1 in the form frmRoomDetails. I'm guessing i need For Next or something like that but i don't know and also unsure of how to code it.

Private Sub FloorNumber_AfterUpdate()

If [Forms]![frmSiteDetails]![frmRoomDetails].[Form]![FloorNumber] = 1 Then

[Forms]![frmSiteDetails]![frmFloorsDetails].[Form]![Text8].Value = [Forms]![frmSiteDetails]![frmRoomDetails].[Form]![Area]

End If

End Sub

[June7]

Are you trying to save aggregate data? Why?

Cannot add up multiple records that way. Would have to open a RecordSet object and loop through records or physically move to each record on the form.