Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Is there a way to mail merge into a table located in a Word doc?
Please advise--I've tried everything I can think of!
|
#2
|
|||
|
|||
Is there a way to mail merge into a table located in a Word doc?
If you mean that you need to get the data from multiple records into the
table, then "no", not directly. You could use a catalog (or in Word XP and later it is called directory) type mailmerge to create the table and then copy and paste it into your other document. To do this, in the catalog or directory mail merge main document, insert the names of the merge fields into the cells of one row table. Then when you execute that merge to a new document, you will get a table containing a row of data for each record in the data source. If, as I suspect however, you may be talking about a multiple items per condition type of operation, 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 "surfergirl" wrote in message ... Please advise--I've tried everything I can think of! |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
take yet another lesson from wordperfect "reveal codes" | Microsoft Word Help | |||
Mail Merge Word 2003 Issue | Mailmerge | |||
Envelope Address | New Users | |||
Specific Email Merge w/ Specific Attachements | Mailmerge | |||
Word 2002 Mail Merge - merging to new doc displays blank empty dia | Mailmerge |