WD2000: How to Change the Default File Name and Directory

ID: Q212386

The information in this article applies to:

Microsoft Word 2000

SUMMARY

You can change the default folder and file names that appear when you click Open on the File menu.

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact a Microsoft Certified Solution Provider or the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Solution Providers, please see the following page on the World Wide Web:

http://www.microsoft.com/mcsp/

For more information about the support options available from Microsoft, please see the following page on the World Wide Web:

http://www.microsoft.com/support/supportnet/overview/overview.asp

Changing the Default Directory

To change the default directory that appears when you click Open on the File menu, use either of the following methods.

Method 1: Manually change the default directory.

On the Tools menu, click Options.

Select the File Locations tab.

Under File types, select Documents, and then click Modify.

Change to the location you want.

Method 2: Use a macro to change the default directory.

NOTE: When you quit Word for Windows after you have modified or added these changes, you may be prompted to save the changes to the Normal template. Choose Yes to save your changes.

Macro to change the default document folder:


Sub SetDefaultFolder()
   ' Set the default directory.
   ' Note: Substitute any existing directory.
   Options.DefaultFilePath(Path:=wdDocumentsPath) = "D:\My Documents"
End Sub

Changing the Default FileOpen Extension

Use the following example Visual Basic for Applications macro to set the default FileOpen extension:

NOTE: The name of the macro must be FileOpen.


Sub FileOpen()
   Dim MyDialog As Dialog
   Set MyDialog = Dialogs(wdDialogFileOpen)
   MyDialog.Name = "*.txt"
   MyDialog.Show
End Sub

NOTE:Setting MyDialog.Name = "*.*" will display Files of Type: All Files (*.*). When using certain document formats with the Name Property of the dialog object, such as *.rtf, the Files of Type list shows All Word Documents(*.doc; *.dot; *.htm; *.html; *.url; * instead of, in this case, the expected value of Rich Text Format (*.rtf). However, this does not affect the listing in the dialog box of the specified file type. Only those file types specified by the Name Property of the dialog object will appear when the Open dialog box (on the File menu) is displayed.

REFERENCES

For more information about getting help with Visual Basic for Applications, please see the following articles in the Microsoft Knowledge Base:

Q226118 OFF2000: Programming Resources for Visual Basic for Applications

Q212536 OFF2000: How to Run Sample Code from Knowledge Base Articles

Additional query words: vb vba vbe grey gray unavailable set filespec filetype format

Keywords : kbmacro kbusage kbdta kbdtacode word97
Version : WINDOWS:2000
Platform : WINDOWS
Issue type : kbhowto