<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0">
  <channel>
    <title>'mail merge from ms access to ms word vba' Thread RSS Feed</title>
    <link>http://www.programmersheaven.com/</link>
    <description>Contains the latest posts from the thread 'mail merge from ms access to ms word vba' posted on the 'VBA' forum at Programmer's Heaven.</description>
    <language>en</language>
    <copyright>Copyright 2013 Programmers Heaven</copyright>
    <pubDate>Sun, 26 May 2013 00:25:17 -0700</pubDate>
    <lastBuildDate>Sun, 26 May 2013 00:25:17 -0700</lastBuildDate>
    <generator>Argotic Syndication Framework 2007.3.0.1, http://www.codeplex.com/Argotic</generator>
    <docs>http://www.rssboard.org/rss-specification</docs>
    <ttl>360</ttl>
    <image>
      <url>http://www.programmersheaven.com/images/ph.gif</url>
      <title>Programmers Heaven</title>
      <link>http://www.programmersheaven.com/</link>
      <width>88</width>
      <height>31</height>
    </image>
    <item>
      <title>mail merge from ms access to ms word vba</title>
      <link>http://www.programmersheaven.com/mb/vba/426421/426421/mail-merge-from-ms-access-to-ms-word-vba/</link>
      <description>Hello everyone I am trying to create a program that when you click a button it sends a mail merge to word and replaces all the bookmarks that I have setup.  I am using 2010 for both products.  I have pretty much everything done, but I am not sure how to have it open a document using a template.  This is being done with vba.  Right now it just opens the template and I don't really want that happening because I don't want anyone to save over the template.  Here is the code that I have.  I have only included the front end the rest of the code is just replacing the bookmarks.&lt;br /&gt;
&lt;br /&gt;
Private Sub cmdPrint_Click()&lt;br /&gt;
Dim MyWord As Word.Application&lt;br /&gt;
Dim PathDocu As String&lt;br /&gt;
&lt;br /&gt;
    &lt;br /&gt;
If Me.LawFirmName &amp;lt;&amp;gt; "" Then&lt;br /&gt;
    Set MyWord = New Word.Application&lt;br /&gt;
    PathDocu = "C:\Word Template\"&lt;br /&gt;
&lt;br /&gt;
With MyWord&lt;br /&gt;
&lt;br /&gt;
.Visible = True&lt;br /&gt;
    .Documents.Open (PathDocu &amp;amp; "MailerTemp.dotx")&lt;br /&gt;
&lt;br /&gt;
Thanks in advance for the help.</description>
      <guid isPermaLink="true">http://www.programmersheaven.com/mb/vba/426421/426421/mail-merge-from-ms-access-to-ms-word-vba/</guid>
      <pubDate>Fri, 16 Dec 2011 15:25:36 -0700</pubDate>
      <category>VBA</category>
    </item>
    <item>
      <title>Re: mail merge from ms access to ms word vba</title>
      <link>http://www.programmersheaven.com/mb/vba/426421/426616/re-mail-merge-from-ms-access-to-ms-word-vba/#426616</link>
      <description>I found the answer elsewhere and I figured I would post a response so that if anyone else had this issue they could find it here.&lt;br /&gt;
&lt;br /&gt;
Private Sub cmdPrint_Click()&lt;br /&gt;
 Dim MyWord As Word.Application&lt;br /&gt;
 Dim PathDocu As String&lt;br /&gt;
 &lt;br /&gt;
&lt;br /&gt;
If Me.LawFirmName &amp;lt;&amp;gt; "" Then&lt;br /&gt;
 Set MyWord = New Word.Application&lt;br /&gt;
 PathDocu = "C:\Word Template\"&lt;br /&gt;
 &lt;br /&gt;
With MyWord&lt;br /&gt;
 &lt;br /&gt;
.Visible = True&lt;br /&gt;
 .Documents.Open (PathDocu &amp;amp; "MailerTemp.dotx")&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
This is the original post question and the answer is to change this portion .Visible = True&lt;br /&gt;
 .Documents.Open (PathDocu &amp;amp; "MailerTemp.dotx")&lt;br /&gt;
&lt;br /&gt;
If you change the .Open to .Add it will open a new document using the template.&lt;br /&gt;</description>
      <guid isPermaLink="true">http://www.programmersheaven.com/mb/vba/426421/426616/re-mail-merge-from-ms-access-to-ms-word-vba/#426616</guid>
      <pubDate>Tue, 27 Dec 2011 12:59:17 -0700</pubDate>
      <category>VBA</category>
    </item>
  </channel>
</rss>