jamesdpmullan
Registered User.
- Local time
- Today, 09:31
- Joined
- Oct 21, 2013
- Messages
- 24
OK, i thought i had finally understood loops but this seems to be my downfall!
Before i ask my question, i am where i am as this is the only way i can go about getting the data...I have attached an image of what i am trying to achieve so here goes:
I need to add data from one subform to another - problem is they are both continuous forms and both subforms.
The part in green is where it needs to go, and the white is where the data is held. The links have already been created, i just need to get the info from subform 1 to subform 2.
I have attached code but it only moves line selected / first line.
Any help appreciated
Before i ask my question, i am where i am as this is the only way i can go about getting the data...I have attached an image of what i am trying to achieve so here goes:
I need to add data from one subform to another - problem is they are both continuous forms and both subforms.
The part in green is where it needs to go, and the white is where the data is held. The links have already been created, i just need to get the info from subform 1 to subform 2.
I have attached code but it only moves line selected / first line.
Any help appreciated
Code:
Dim dst As DAO.Recordset
Set dst = Me.frmAS9102_Material_LINK.Form.RecordsetClone
With dst
.MoveFirst
Do While Not .EOF
Form2MatFAIBatchNumber = Forms!frmas9102releasesheet!frmAS9102Form2Material.Form!frmAS9102_Material_LINK.Form!works_order_number
MaterialProcess = Forms!frmas9102releasesheet!frmAS9102Form2Material.Form!frmAS9102_Material_LINK.Form!stock_reference
SpecialProcess = Forms!frmas9102releasesheet!frmAS9102Form2Material.Form!frmAS9102_Material_LINK.Form!material_type
dst.MoveNext
Loop
End With
Set dst = Nothing
Last edited: