Retrieve starting folder of template once loaded

[getochkn]

I have a pretty nifty Invoice sheet that I've done that keeps track of the last used invoice number by writing to a cell in the file, saves the file with a name and that number, and then clears the data and saves the template again with the last used invoice number. Everything works great, the only problem is when it goes to save the new invoice and the modified template, it always wants to save it back to my documents and not the starting directory where the template was launched. Now I know that as soon as the template is opened, I get a 'invoice1.xls' file that hasn't been saved and therefore reverts to 'my documents' Is there anyway to retireve the name of the folder where the template was initially started from? For now, I have it in a cell value and that works fine, I'm just trying to make this as dynamic as possible so that if it gets moved, it would automatically just use the new folder for everything. It's a small point and everyone else is happy with it but it still bugs me. Thanks for any help.

 

[fumei]

This come up with the full path of the template. You could then use that as the path, when saving the file created by the template, replacing the template name of course. I put that in just for completeness in getting the full path of the template.

Dim TemplateFilePath As String
Dim curTemplate As Template
Set curTemplate = ActiveDocument.AttachedTemplate
TemplateFilePath = curTemplate.Path & Application.PathSeparator _
& curTemplate.Name

However, I have to ask, why would you want to put the new file in the folder the template was launched from? Templates, I think, should be kept separate from documents they generate. But hey, maybe there is a good reason why you would want to have them together.


Gerry

 

[getochkn]

Basically it's just the way I started it, I may put the template in a different spot, it's not final yet. I tried your code example but I get the VBA error, 'user type not defined' on the Dim curTemplate As Template line.

 

[getochkn]

Ah, it seems the ActiveDocument.AttachedTemplate is only a Word thing and not an Excel method or property. Does anyone have any Excel answers to this?

 

[fumei]

Sorry, in Excel "Application.TemplatePath" returns the local path where templates are stored. Read only string.

Gerry