XL2000: Macro to Open the Most Recently Used File (213758)


The information in this article applies to:

  • Microsoft Excel 2000
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.

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 the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Partners, please visit the following Microsoft Web site:

http://www.microsoft.com/partner/referral/

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

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

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:
  1. Create a new workbook in Excel 2000.
  2. Press ALT+F11 to start the Microsoft Visual Basic Editor.
  3. On the Insert menu, click Module.
  4. Type the sample macro code in the module.
  5. Press ALT+Q to return to Excel.
  6. 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.
Modification Type:MinorLast Reviewed:10/11/2006
Keywords:kbdtacode kbhowto kbProgramming KB213758
©2004 Microsoft Corporation. All rights reserved.