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

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

asked Nov 19 at 15:07

Plarsen

2672822

add a comment |

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

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

asked Nov 19 at 15:07

Plarsen

2672822

add a comment |

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

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

asked Nov 19 at 15:07

Plarsen

2672822

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

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

asked Nov 19 at 15:07

Plarsen

2672822

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

asked Nov 19 at 15:07

Plarsen

2672822

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

edited Nov 19 at 17:49

Cindy Meister

13.3k101934

asked Nov 19 at 15:07

Plarsen

2672822

asked Nov 19 at 15:07

Plarsen

2672822

asked Nov 19 at 15:07

Plarsen

2672822

add a comment |

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

answered Nov 19 at 17:52

Cindy Meister

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

add a comment |

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

Sign up or log in

StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});

Post as a guest

Name

Required, but never shown

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

Name

Required, but never shown

1 Answer
1

active

oldest

votes

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

answered Nov 19 at 17:52

Cindy Meister

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

add a comment |

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

answered Nov 19 at 17:52

Cindy Meister

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

add a comment |

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

answered Nov 19 at 17:52

Cindy Meister

13.3k101934

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

answered Nov 19 at 17:52

Cindy Meister

13.3k101934

answered Nov 19 at 17:52

Cindy Meister

13.3k101934

answered Nov 19 at 17:52

Cindy Meister

13.3k101934

answered Nov 19 at 17:52

Cindy Meister

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

add a comment |

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

add a comment |

draft saved

draft discarded

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});

Post as a guest

Name

Required, but never shown

Post as a guest

Name

Required, but never shown

Sign up or log in

StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});

Post as a guest

Name

Required, but never shown

Sign up or log in

StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});

Post as a guest

Name

Required, but never shown

Sign up or log in

StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});

Post as a guest

Name

Required, but never shown

Name

Required, but never shown

Name

Required, but never shown

This page is only for reference, If you need detailed information, please check here

搜尋此網誌

Ytukyg