下面的VBA代码可以获取Excel中最近使用的工作簿的完整路径和名称，并将其放在工作表的A列中，代码为位于。在 Excel 2007 和 Excel 2010 中，如果通过“Office 按钮（或文件选项卡）→ Excel 选项→高级”设置显示的“最近使用的文档”数量大于“0”，则此代码最多可以显示 50 个最近使用的文档“工作簿名称。对于 Excel 2003，A 列中显示的工作簿名称数量与“文件”菜单底部显示的最近使用的文件数量相同。
按Alt+F11打开VBA编辑器，在右侧代码窗口中输入以下代码：
Sub GetMRUList()
错误继续下一步
Dim i，MRUNum为整数
MRUNum = Application.RecentFiles.Maximum
Application.RecentFiles.Maximum = 50
Range("A1 :A50").Clear
对于 i = 1 到 50
Cells(i, 1) = Application.RecentFiles(i).Path
下一个 i
Application.RecentFiles.Maximum = MRUNum
结束子
运行代码以在 A 列中显示最近使用的工作簿列表。
