Article ID: 213758 - Last Review: November 23, 2006 - Revision: 3.5

XL2000: Macro to Open the Most Recently Used File

View products that this article applies to.

This article was previously published under Q213758

SUMMARY

In Microsoft Excel 2000, if you click to select the Recently used file list check box (on the General tab of the Options dialog box on the Tools menu), the files that you used most recently are listed on the File menu. This article contains a sample macro that you can use to programmatically open the file that you used last.

Back to the top

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 Partner or Microsoft Advisory Services. For more information, visit these Microsoft Web sites:

Microsoft Certified Partners - https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Microsoft Advisory Services - http://support.microsoft.com/gp/advisoryservice (http://support.microsoft.com/gp/advisoryservice)

For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)

Back to the top

Sample Macro

Sub Open_Last_Used_File()

   Dim S as String

   'Set the variable S to the path and file name of the most recently used
   'file.
   S = Application.RecentFiles(1).Name

   'Open the file.
   Workbooks.Open S

End Sub

Back to the top

Using the Sample Macro

NOTE: If you do not click to select the Recently used file list check box, and you run a macro that uses the RecentFiles property of the Application object, you receive the following error message:

Run-time error '9':
Subscript out of range.

To prevent the error message from appearing when you run the macro, click to select the Recently used file list check box described in the "Summary" section before you run the macro.

To use the sample macro, follow these steps:

Create a new workbook in Excel 2000.
Press ALT+F11 to start the Microsoft Visual Basic Editor.
On the Insert menu, click Module.
Type the sample macro code in the module.
Press ALT+Q to return to Excel.
On the Tools menu, point to Macro, and then click Macros. Click Open_Last_Used_File, and then click Run to run the macro.

When you run the macro, it opens the first file in the list of recently used files.

Back to the top