Reply
 
Thread Tools Display Modes
  #1   Report Post  
dawnlin
 
Posts: n/a
Default merge a list to an existing merged document

I have a list of individuals which I have successfully merged. However, each
individual has seperate others listed under them (some just one, some
numerous). Is there a way that I can tell Word to list these? For example,
I have a letter to Mr. Smith who needs to have Mrs Jones & her ph#, Mr Rat &
his ph# and Mrs. Bowman & her ph# listed under him. Then, there's Mr. Jones
who needs Mrs. Miller & her ph#, Mrs. Bowman & her ph# listed in his letter.
Can anyone help me?
  #2   Report Post  
Doug Robbins
 
Posts: n/a
Default

Word does not really have the ability to perform a "multiple items per
condition (=key field)" mailmerge.

See the "Group Multiple items for a single condition" item on fellow MVP
Cindy Meister's website at

http://homepage.swissonline.ch/cindy...faq1.htm#DBPic

Or take a look at the following Knowledge Base Article

How to Work Around Duplicate Names in Mail Merge Data

http://support.microsoft.com/default...b;en-us;302665



Or, if you create a Catalog (on in Word XP and later, it's called Directory)
type mailmerge main document with the mergefields in the cells of a one row
table in the mailmerge main document with the keyfield in the first cell in
the row and then execute that merge to a new document and then run the
following macro, it will create separate tables with the records for each
key field in them. With a bit of further development, you may be able to
get it to do what you want.

' Macro to create multiple items per condition in separate tables from a
directory type mailmerge

Dim source As Document, target As Document, scat As Range, tcat As Range
Dim data As Range, stab As Table, ttab As Table
Dim i As Long, j As Long, k As Long, n As Long
Set source = ActiveDocument
Set target = Documents.Add
Set stab = source.Tables(1)
k = stab.Columns.Count
Set ttab = target.Tables.Add(Range:=Selection.Range, numrows:=1,
numcolumns:=k - 1)
Set scat = stab.Cell(1, 1).Range
scat.End = scat.End - 1
ttab.Cell(1, 1).Range = scat
j = ttab.Rows.Count
For i = 1 To stab.Rows.Count
Set tcat = ttab.Cell(j, 1).Range
tcat.End = tcat.End - 1
Set scat = stab.Cell(i, 1).Range
scat.End = scat.End - 1
If scat tcat Then
ttab.Rows.Add
j = ttab.Rows.Count
ttab.Cell(j, 1).Range = scat
ttab.Cell(j, 1).Range.Paragraphs(1).PageBreakBefore = True
ttab.Rows.Add
ttab.Cell(j + 1, 1).Range.Paragraphs(1).PageBreakBefore = False
For n = 2 To k
Set data = stab.Cell(i, n).Range
data.End = data.End - 1
ttab.Cell(ttab.Rows.Count, n - 1).Range = data
Next n
Else
ttab.Rows.Add
For n = 2 To k
Set data = stab.Cell(i, n).Range
data.End = data.End - 1
ttab.Cell(ttab.Rows.Count, n - 1).Range = data
Next n
End If
Next i


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP
"dawnlin" wrote in message
...
I have a list of individuals which I have successfully merged. However,
each
individual has seperate others listed under them (some just one, some
numerous). Is there a way that I can tell Word to list these? For
example,
I have a letter to Mr. Smith who needs to have Mrs Jones & her ph#, Mr Rat
&
his ph# and Mrs. Bowman & her ph# listed under him. Then, there's Mr.
Jones
who needs Mrs. Miller & her ph#, Mrs. Bowman & her ph# listed in his
letter.
Can anyone help me?



Reply
Thread Tools
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
inserting new names to existing mail merge list alphabetically Lost and confused in mail merge Mailmerge 1 July 28th 05 11:05 AM
Merge to New Document Template Association Al Mailmerge 2 June 2nd 05 09:11 AM
Date Field in Merge Document Karen Hart Mailmerge 35 March 29th 05 12:38 PM
Don't ask to merge into existing document when opening 2nd document Chris Barnes New Users 1 February 3rd 05 02:23 PM
Creating a drop-down list in an existing Word document Kevin Microsoft Word Help 3 December 8th 04 11:23 PM


All times are GMT +1. The time now is 07:07 AM.

Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 Microsoft Office Word Forum - WordBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Word"