[AccessD] Select Range of Records ...Word from Access

Bill,

Having read this, it seems to me that you aren't
really using a template at all. If you save the doc
as .dot, this may help you for every 4 records:

---Posted by Dev Ashish---

Opening a new Word document based on a
template through Automation

    To open a new Word document based on an
    existing template, we need to specify a
    value for the Template argument of the
    Add method of the Documents collection.

    If the template file (.DOT) is saved in
    the UserTemplates path,  we can use the
    pre-defined contant wdUserTemplatesPath.
    Otherwise, we will need to supply the
    complete path to the template file.

'****** Code Start ********
Private mobjWordApp As Word.Application

Private Sub Command1_Click()
Const conTEMPLATE_NAME = "\Templates\merge.dot"

   Set mobjWordApp = New Word.Application
   With mobjWordApp
      .Visible = True
      .WindowState = wdWindowStateMaximize
      .Documents.Add Template:=(.Options.DefaultFilePath( _
               wdUserTemplatesPath) & conTEMPLATE_NAME)
   End With
End Sub
'****** Code End ********

Michael R. Mattys
www.mattysconsulting.com


----- Original Message -----
From: "William Hindman" <wdhindman at bellsouth.net>
To: "Access Developers discussion and problem solving"
<accessd at databaseadvisors.com>
Sent: Wednesday, August 20, 2003 10:56 PM
Subject: [AccessD] Select Range of Records ...Word from Access


> ...ok ...just don't ask how I get into these things ...and if this seems
> like a JC post, I really don't want to hear about it :(
>