By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
446,392 Members | 1,556 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 446,392 IT Pros & Developers. It's quick & easy.

set path for save as dialog

P: 7
Hello,

I export data to word using a template. then I want to save the template as word file.

to set the file name i use the following code:
Expand|Select|Wrap|Line Numbers
  1. With appWord.Dialogs(wdDialogFileSummaryInfo)
  2.       .Title = "ownttitle"
  3.       .Execute
  4.   End With
  5.  
  6.   ' Then show save as dialog
  7.   With appWord.Dialogs(wdDialogFileSaveAs)
  8.       .Show
  9.   End With
  10.  
  11.  
How can I set the directory where I want to save the file?

Thanks for helping.
Aug 6 '07 #1
Share this Question
Share on Google+
2 Replies


P: 7
Hello,

I export data to word using a template. then I want to save the template as word file.

to set the file name i use the following code:
Expand|Select|Wrap|Line Numbers
  1. With appWord.Dialogs(wdDialogFileSummaryInfo)
  2.       .Title = "ownttitle"
  3.       .Execute
  4.   End With
  5.  
  6.   ' Then show save as dialog
  7.   With appWord.Dialogs(wdDialogFileSaveAs)
  8.       .Show
  9.   End With
  10.  
  11.  
How can I set the directory where I want to save the file?

Thanks for helping.
Today I looked again and found the solution to set the directory with the file save dialog (and also filename):
Expand|Select|Wrap|Line Numbers
  1.  
  2. With appWord.Dialogs(wdDialogFileSaveAs)
  3.       .Name = path & filename
  4.       .Show
  5.   End With
  6.  
Aug 7 '07 #2

Rabbit
Expert Mod 10K+
P: 12,396
Excellent, thanks for posting the solution for others.
Aug 7 '07 #3

Post your reply

Sign in to post your reply or Sign up for a free account.