利用VBA获取Excel最近使用的工作簿列表
发布时间:2022-12-27 07:24:13
标签:代码,工作,数量,显示,Excel函数
下面的VBA代码可以获取Excel中最近使用的工作簿的完整路径和名称,并将其放到代码所在工作表的A列中。在Excel 2007和Excel 2010中,如果通过“Office按钮(或“文件”选项卡)→Excel选项→高级”设置显示“最近使用的文档”数量大于“0”,该代码可以显示最近使用的最多50个工作簿名称。而对于Excel 2003,A列中显示的工作簿名称数量与“文件”菜单底部所显示的最近使用文件数量相同。
按Alt+F11,打开VBA编辑器,在右侧代码窗口中输入下列代码:
Sub GetMRUList()
On Error Resume Next
Dim i, MRUNum As Integer
MRUNum = Application.RecentFiles.Maximum
Application.RecentFiles.Maximum = 50
Range("A1:A50").Clear
For i = 1 To 50
Cells(i, 1) = Application.RecentFiles(i).Path
Next i
Application.RecentFiles.Maximum = MRUNum
End Sub
运行代码,即可在A列中显示最近使用的工作簿列表。


猜你喜欢
- 我们经常会去使用PPT制作各种演讲文档,而我们难免会在使用PPT时候加入视频来进行演示,但很多小伙伴不清楚如何去插入加视频,那么下面就和小编
- 微软今天更新了最新的Win11 22000.65预览版,这次更新修复了众多的问题,其他大家关心的右键刷新和桌面任务也都恢复到了Win10,很
- 这篇文章主要介绍了win10pdf虚拟打印机怎么添加?win10添加pdf虚拟打印机步骤教程的相关资料,需要的朋友可以参考下本文详细内容介绍
- 怎么使用手机助手给vivo手机升级系统?很多VIVO手机用户在升级是都会担心自己在升级系统时出现问题,手机上的数据丢失了,下面,小编就教大家
- kodi怎么设置中文?kodi播放器支持电脑、电视、安卓等多个播放平台,能够让用户看电视、听音乐、玩游戏、看电影等,但是软件的界面是英文,要
- 一同事在制作简报是遇到一个奇怪的现象,在WPS文档某一位置插入的图片似乎被裁掉大部,只能显示其底部的一小条,当选中此图片时,会在图片上方的文
- 1、单击“插入”选项卡,单击“视频”—“PC上的视频”来插入一视频,插入后的效果如下图所示。 2、插入后的效果如下
- Win11系统谷歌的IDM插件用不了怎么解决?最近有用户反映自己谷歌浏览器的IDM插件用不了,试了好几个IDM安装包,插件也安装不上去,无法
- 平时我们总是需要计算各种到期时间,例如合同到期日、员工转正日期、产品有效期等等。大家普遍的做法应该都是用DATE函数计算,但是DATE函数的
- word是我们常用的办公软件,通常我们会用word打印很多文档文件,那么word中无法打印图形怎么办?下面小编带来打印图形不显示的设置方法
- 进入到系统后,按“Ctrl+Alt+T”调出命令行终端,以后的操作基本都是基本命令行模式。输入“sudo apt-get 
- 首先来个封面——背景为灰色,主题居中(蓝灰色),外加一个矩形(蓝灰色,无边框,充当后面的时间轴)。主题因人而异,这里设为“旅行”(JOURN
- qclean.exe是McAfee Internet Security网络安全套装相关程序,用于清理你计算机上的无用文件进程文件: qcle
- 最近有Win7系统用户反映,因为工作的需要,经常要分析一封邮件的来源等信息,但是因为习惯了使用Office Outook来查看邮件属性信息,
- 在日常的工作生活中,我们经常会遇到一些不能复制的网页、文档,或者需要将书籍上的文章录入到电脑,这个时候大家都会十分的烦恼,因为手动输入是一个
- 在平时的工作中,我们常常会需要一些软件或者资料,因此就会到网上去下载,但是没想到有时候下载下来的确是tar格式的文件,不少用户不知道tar是
- Pdf文件怎么拆分成指定的页数?有一份pdf文档,想要按照固定的页数来拆分,该怎么办呢?下面我们就来看啊可能pdf文件照指定的页数进行拆分的
- 眼看已经周五,微软本周仅发布了Build 15063这一个RS2预览版更新,所以它就是RTM版?现在看来,应该是差不离了。今晨,微软为慢速通
- excel单元格式次序是什么?excel单元格式次序其实就是单元格间的次序。就是谁在那个位置的意思。是用按住shift再移动单元格后,移动的
- 打印文章是日常办公中必不可少的事情。因为它每天都在进行,所以默认情况下,所有设置都是第一次设置。如果你想在文档中插入相同的页码,你怎么做?如