Changing FileOpenDirectory for a saved document

[Larry]

This code opens the SaveAs dialog box to the Documents folder:

ChangeFileOpenDirectory ("C:\Documents")
Application.Dialogs(wdDialogFileSaveAs).Show

But it only works if the active document is an unsaved document.
Otherwise, the SaveAs box opens to the folder of the activedocument.

Is there any way to get the same result with a saved document as with an
unsaved document?

Larry

 

[Jay Freedman]

Hi, Larry,

We have that one covered:
http://www.mvps.org/word/FAQs/MacrosVBA/ChangeSaveAsPath.htm

 

[Larry]

Jay,

Spectacular. The MVPs are a treasure.

However, I've got to remember to search at the MVPs site more often
before posting.

Larry

 

[Larry]

Oh, gosh, I realize I had gotten this code once before but somehow it
got commented out and I lost track of it. The thing with Word is, it's
so huge, there's no way you can remember all the things you've already
learned. In fact, sometimes you can't even remember that you did learn
them.

 

[Jay Freedman]

Oh, gosh, I realize I had gotten this code once before but somehow it
got commented out and I lost track of it. The thing with Word is,
it's so huge, there's no way you can remember all the things you've
already learned. In fact, sometimes you can't even remember that you
did learn them.

I know that feeling well. Multiply it by six or seven versions of Word...