Word 2013 VBA - Save template including macro modules











up vote
0
down vote

favorite












I have an macro-enabled template. One function is saving the current document (based on the template) as another macro-enabled template. Code:



Private Sub cmdSaveAsTemplate_Click()

Dim choice As Integer
Dim dia As FileDialog

Set dia = Application.FileDialog(msoFileDialogSaveAs)
dia.FilterIndex = 5
dia.InitialFileName = "TEMPLATE DealDoc"

choice = dia.Show
If choice <> 0 Then
dia.Execute

End If

End Sub


This code works fine except that the saved "copy" does not contain the macros and forms.



I want the saved template to contain the makro modules, forms and the code inside "ThisDocument".










share|improve this question




























    up vote
    0
    down vote

    favorite












    I have an macro-enabled template. One function is saving the current document (based on the template) as another macro-enabled template. Code:



    Private Sub cmdSaveAsTemplate_Click()

    Dim choice As Integer
    Dim dia As FileDialog

    Set dia = Application.FileDialog(msoFileDialogSaveAs)
    dia.FilterIndex = 5
    dia.InitialFileName = "TEMPLATE DealDoc"

    choice = dia.Show
    If choice <> 0 Then
    dia.Execute

    End If

    End Sub


    This code works fine except that the saved "copy" does not contain the macros and forms.



    I want the saved template to contain the makro modules, forms and the code inside "ThisDocument".










    share|improve this question


























      up vote
      0
      down vote

      favorite









      up vote
      0
      down vote

      favorite











      I have an macro-enabled template. One function is saving the current document (based on the template) as another macro-enabled template. Code:



      Private Sub cmdSaveAsTemplate_Click()

      Dim choice As Integer
      Dim dia As FileDialog

      Set dia = Application.FileDialog(msoFileDialogSaveAs)
      dia.FilterIndex = 5
      dia.InitialFileName = "TEMPLATE DealDoc"

      choice = dia.Show
      If choice <> 0 Then
      dia.Execute

      End If

      End Sub


      This code works fine except that the saved "copy" does not contain the macros and forms.



      I want the saved template to contain the makro modules, forms and the code inside "ThisDocument".










      share|improve this question















      I have an macro-enabled template. One function is saving the current document (based on the template) as another macro-enabled template. Code:



      Private Sub cmdSaveAsTemplate_Click()

      Dim choice As Integer
      Dim dia As FileDialog

      Set dia = Application.FileDialog(msoFileDialogSaveAs)
      dia.FilterIndex = 5
      dia.InitialFileName = "TEMPLATE DealDoc"

      choice = dia.Show
      If choice <> 0 Then
      dia.Execute

      End If

      End Sub


      This code works fine except that the saved "copy" does not contain the macros and forms.



      I want the saved template to contain the makro modules, forms and the code inside "ThisDocument".







      vba ms-word






      share|improve this question















      share|improve this question













      share|improve this question




      share|improve this question








      edited Nov 19 at 17:49









      Cindy Meister

      13.3k101934




      13.3k101934










      asked Nov 19 at 15:07









      Plarsen

      2672822




      2672822
























          1 Answer
          1






          active

          oldest

          votes

















          up vote
          1
          down vote



          accepted










          It's not possible to save the macros in an attached template into a document created from the template using SaveAs, not even when saving as file type docm.



          The only way would be to create the new file as a new template, right from the start:



          Documents.Add Template:=pathNameToTemplate, NewTemplate:=True





          share|improve this answer





















          • Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
            – Plarsen
            Nov 20 at 19:29











          Your Answer






          StackExchange.ifUsing("editor", function () {
          StackExchange.using("externalEditor", function () {
          StackExchange.using("snippets", function () {
          StackExchange.snippets.init();
          });
          });
          }, "code-snippets");

          StackExchange.ready(function() {
          var channelOptions = {
          tags: "".split(" "),
          id: "1"
          };
          initTagRenderer("".split(" "), "".split(" "), channelOptions);

          StackExchange.using("externalEditor", function() {
          // Have to fire editor after snippets, if snippets enabled
          if (StackExchange.settings.snippets.snippetsEnabled) {
          StackExchange.using("snippets", function() {
          createEditor();
          });
          }
          else {
          createEditor();
          }
          });

          function createEditor() {
          StackExchange.prepareEditor({
          heartbeatType: 'answer',
          convertImagesToLinks: true,
          noModals: true,
          showLowRepImageUploadWarning: true,
          reputationToPostImages: 10,
          bindNavPrevention: true,
          postfix: "",
          imageUploader: {
          brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
          contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
          allowUrls: true
          },
          onDemand: true,
          discardSelector: ".discard-answer"
          ,immediatelyShowMarkdownHelp:true
          });


          }
          });














           

          draft saved


          draft discarded


















          StackExchange.ready(
          function () {
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53377469%2fword-2013-vba-save-template-including-macro-modules%23new-answer', 'question_page');
          }
          );

          Post as a guest















          Required, but never shown

























          1 Answer
          1






          active

          oldest

          votes








          1 Answer
          1






          active

          oldest

          votes









          active

          oldest

          votes






          active

          oldest

          votes








          up vote
          1
          down vote



          accepted










          It's not possible to save the macros in an attached template into a document created from the template using SaveAs, not even when saving as file type docm.



          The only way would be to create the new file as a new template, right from the start:



          Documents.Add Template:=pathNameToTemplate, NewTemplate:=True





          share|improve this answer





















          • Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
            – Plarsen
            Nov 20 at 19:29















          up vote
          1
          down vote



          accepted










          It's not possible to save the macros in an attached template into a document created from the template using SaveAs, not even when saving as file type docm.



          The only way would be to create the new file as a new template, right from the start:



          Documents.Add Template:=pathNameToTemplate, NewTemplate:=True





          share|improve this answer





















          • Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
            – Plarsen
            Nov 20 at 19:29













          up vote
          1
          down vote



          accepted







          up vote
          1
          down vote



          accepted






          It's not possible to save the macros in an attached template into a document created from the template using SaveAs, not even when saving as file type docm.



          The only way would be to create the new file as a new template, right from the start:



          Documents.Add Template:=pathNameToTemplate, NewTemplate:=True





          share|improve this answer












          It's not possible to save the macros in an attached template into a document created from the template using SaveAs, not even when saving as file type docm.



          The only way would be to create the new file as a new template, right from the start:



          Documents.Add Template:=pathNameToTemplate, NewTemplate:=True






          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered Nov 19 at 17:52









          Cindy Meister

          13.3k101934




          13.3k101934












          • Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
            – Plarsen
            Nov 20 at 19:29


















          • Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
            – Plarsen
            Nov 20 at 19:29
















          Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
          – Plarsen
          Nov 20 at 19:29




          Okay, thanks. Then I will need to rethink the whole process and instead use the saved copy as a data-document that is possible to import back.
          – Plarsen
          Nov 20 at 19:29


















           

          draft saved


          draft discarded



















































           


          draft saved


          draft discarded














          StackExchange.ready(
          function () {
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53377469%2fword-2013-vba-save-template-including-macro-modules%23new-answer', 'question_page');
          }
          );

          Post as a guest















          Required, but never shown





















































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown

































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown







          Popular posts from this blog

          404 Error Contact Form 7 ajax form submitting

          How to know if a Active Directory user can login interactively

          TypeError: fit_transform() missing 1 required positional argument: 'X'