Mail Merge problem

[ascaife]

I have a database for tracking, among other things, student debt for units completed.

Four times a year, we produce a letter for each student, detailing the unit of study completed that quarter, how much they owe, and various other info for that quarter.

We use Albert Kallal's mail merge to send the query info to ms word, and they would like to retain the ability to modify the layout, therefore, a report will not be suitable.

My problem is, some students complete more than one unit of study, and at present they receive a letter for each unit, whereas we would like to just have one letter per student and list each unit on the same letter.

Any ideas would be greatly appreciated.

 

[orna]

Look at Hartman's grate sample at
http://www.access-programmers.co.uk/forums/showthread.php?t=153459

 

[ascaife]

Thank you. That's excellent.

I think, with my very limited VBA knowledge I can probably fumble my way around getting this to work for one record at a time, but how would I get it to loop on every record in my query.

 

[orna]

This piece of code do it:
Set qdDAO = db.QueryDefs!qDependents 'Change qDependents with your query qdDAO.Parameters![EnterContactID] = Me.ContactID
Set rsDAO = qdDAO.OpenRecordset
Do While rsDAO.EOF = False
sFamily = sFamily & rsDAO!FirstName & "; "
rsDAO.MoveNext
Loop
If Len(sFamily) > 1 Then
sFamily = Left(sFamily, Len(sFamily) - 2) ' remove trailing ;
End If

 

[ascaife]

Won't that just loop the table results in one letter? I would like to produce one latter for every student in one mailerge. Is that possible?