代码运行结果：

代码截图：

代码文本：

Public Sub 设置最近使用的文件清单数()
    '最近使用的文件清单中的最多文件数设为 6
    Application.RecentFiles.Maximum = 6
    MsgBox "最近使用的文件清单中的最多文件数被设为 6个"
End Sub

注释：

我们在使用EXCEL时会用到最近使用文件数,在这个列表中我们可以快速地选择以前编辑过的文件,从而快速地打开,并且不用去记这些EXCEL文件的存放路径。但是如何增减文件数，收藏该代码，莫到用时方恨少哦~！

VBA编辑神器放送

VBA编程懒人神器推荐 VBA代码助手 可以极大提高编程速度，降低编程门槛欢迎使用
VBA密码破解 VBA代码对齐  VBA代码混淆保护加密 代码库输入提示 VBA模块隐藏
下载链接：http://excel880.com/blog/archives/11297