Error to Automation mailmerge to printer in word 2003

[alamas]

hi!
Automation mailmerge with next vb code:

g_objWord.Documents.Ope
FileName:=GetTitleFromFilename(g_strFileTemplate)
g_objWord.ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
g_objWord.ActiveDocument.MailMerge..OpenDataSource Name:=sDataFile
g_objWord.Options.UpdateLinksAtPrint = True
g_objWord.Options.UpdateFieldsAtPrint = True


With g_objWord.ActiveDocument
.MailMerge.SuppressBlankLines = False
.MailMerge.Destination = 1 '= wdSendToPrinter
.MailMerge.DataSource.FirstRecord = 1
.MailMerge.DataSource.LastRecord = -16
.MailMerge.Execute
.Close 0
End With

'*************************************************
the template has a table. I need adjust the dimensions of cells in m
table to reflect the data that is in them.

It works correctly when:
- mailmerge to a new document.(Manually or with this code)
- mailmerge to printer.(Manually)

I want to send the document to a printer.


Thanks

 

[Doug Robbins - Word MVP]

And what happens when you use the code to merge it to the printer?

How to you expect to be able to adjust the dimensions of the cells of the
table if you are going to use automation to merge the document directly to
the printer?

--
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

 

[alamas]

My printer is Acrobat distiller 5
when i use the code to merge it to the printer i obtain the pdf
document without to adjust the dimensions of the cells.
with word 2000 works correctly although it shows the print dialog box.

 

[Doug Robbins - Word MVP]

See the article "How to do a mail merge to the printer using VBA, without
displaying the Print dialog" at:

http://www.word.mvps.org/FAQs/MailMerge/MergeStraightToPrintrWVBA.htm


--
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