View Single Post
  #2  
Old August 24th, 2004, 04:41 PM
Cindy M -WordMVP-
external usenet poster
 
Posts: n/a
Default

Hi Paul,

I'm not clear on what you mean by the "multiple documents" that should
result. Do you mean a separate document for each record you're merging?
Or separate documents containing all the records for each of the "main"
documents you're pulling in using the SubDocument feature?

For the former (pulling apart the resulting records of a merge) there
are various approaches (my website and word.mvps.org). But most of them
base on the fact that a section break is inserted between each new
record. However, since you're using the SubDocument feature, your main
document is already chock full of section breaks...

Assuming that only the mail merge is inserting New Page section breaks,
you could try modifying either of these approaches to test for that type
of section break.

Or, if this is Word 2002/2003 you might want to consider using mail
merge events to change how the result is being processed.

I have multiple merge documents that all use the same data source (TAB
delimited txt file)

I have a "Merge Macro.dot" document that I call that runs a macro to
do the mail merge.

It reads a list of the documents that I want to merge

e.g

'Read the list of documents to be merged
Open ("C:\Mydoclist.txt") For Input As #1
Do While Not EOF(1)
Input #1, FileToPrn
'Insert the actual file
Selection.Range.Subdocuments.AddFromFile Name:="C:\"&
FileToPrn, ReadOnly:=True
Loop
Close #1


And then does the mail merge.

ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
ActiveDocument.MailMerge.OpenDataSource Name:="C:\emergdat.txt"
With ActiveDocument.MailMerge
.Destination = wdSendToNewDocument
.MailAsAttachment = False
.MailAddressFieldName = ""
.MailSubject = ""
.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Execute Pause:=True
End With

The problem is that is joins all the documents together to make one
long document. I need it wo be separate documents. I.e There will be
multiple windows open in Word.

I don't really know the Word VBA but I can't find anything that would
instruct word to create a new document each time.


Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004)
http://www.word.mvps.org

This reply is posted in the Newsgroup; please post any follow question
or reply in the newsgroup and not by e-mail :-)