[下载]喜讯：文件目录管理加载宏一升再升，免费下载[下载]

JXM · 发表于 2002-11-6 18:27

突破一次更名限制，只要没有退出EXCEL，可反复更名，并支持文件目录库当时刷新。 1 如何安装此加载宏程序请将加载宏“文件目录管理021104.xla”复制到你的本机OFFICE(只支持office2000以上)的LIABRAY目录即可 2 如何启动程序 "启动EXCEL2000，在工具栏>加载宏的列表框中将“文件目录管理021104.xla”打勾选取,按确定即可启动，作者在EXCELXP上试用，发现有找不到工程或库的问题，请将除以下四个库Visual Basic for Application(VBA) MS EXCEL9.0 OBJECT LIABRARY(EXCEL9.0I)、MS FORMS 2.0 OBJECT LIABRARY(FM20.DLL)、 MS OFFICES 9.0 OBJECT LIABRARY(MSO9.DLL)外其余工程库引用的勾去掉即可得到一文件目录管理工具栏" 3 如何生成文件目录清单 "按一下文件目录管理工具栏上的生成文件管理库按钮，就会启动打开文件对话框，请在要生成清单的目录内任选一个文件，点击打开，然后会启动一个另存为对话框，请将即将生成的文件清单工作簿存盘，按确定程序将自动生成一个工作簿，内含文件目录、查询文件、批量更名三个工作表。" 4 如何批量改名 "请在批量更名工作表对应文件名后输入新文件名，然后按执行批量改名按钮即可，可无限次更名，且更名后目录表会自动更新由于本版尚未采用队列技术，所当文件总数达到上千个时更名稍慢，另一个问题是当用户退出EXCEL再打开文件库，由于内存释放，更名功能不可再用，要用只有重新生成文件库" 5 如何按文件名关键字查询文件全称首先当然可以在文件目录工作表上用自定义筛选啦。介绍第二种方法，在查询文件工作表上输入文件名关键字单元格（c5）输入带通配符的文本串，如 *第2001号*，*建总函???*等 "本查询只设置显示40个结果，文件总数限制为30000个，按时间范围查询在进一步开发中，另按文件名查询不能带超链，也在进一步改善。" [upload=rar]uploadImages/20021161826137281.rar[/upload]

bluetree · 发表于 2002-11-7 20:04

我想问一下,怎么样在打开EXCEL后,那个工具条可以出现在工具栏上,我的总是在文件正中间放着,每一次都要手动把它放上去

JXM · 发表于 2002-11-7 20:50

是我故意将工具栏在程序中设为浮动，而不是向上停靠。因为这个文件目录管理加载宏应该不常用，不用时在工具栏加载宏中把它的勾去掉，这个讨人嫌的工具栏就不会再出现了。当然改代码也可以。

水清山 · 发表于 2002-11-12 20:32

哈！看来不会就是不会，只有进一步学习了。好东西不能错过！

skylark · 发表于 2002-11-12 21:34

To JXM: 在我这儿为何报错? [upload=gif]uploadImages/2002111221302042929.gif[/upload] 有关引用的要求做了。我用Office2000. 021101是可用的。 —————————————————— Try Anything Once[em08]

对面男孩 · 发表于 2002-11-13 09:21

佩服！

chengxiang · 发表于 2002-11-13 09:46

的确是个好东东，您是怎么想到这一点的。看到好实用的功能，可能微软的程序员们在下一个office版本中要加入这串代码啦!谢谢您的奉献。

对面男孩 · 发表于 2002-11-13 12:40

可惜不能看到代码。

JXM · 发表于 2002-11-13 18:15

可能需要在你的机上重新编译，在VBE的工具-引用菜单，选择正确的引用库，然后重编译一下就行了。

skylark · 发表于 2002-11-13 21:30

To JXM: 我有两台机，一台可以用，也没做什么，一台还是无法用。也罢，感谢你的指点，也感谢你的文件！ _____________________________ Try Anything Once

		自动登录	找回密码
密码			免费注册

[下载]喜讯：文件目录管理加载宏一升再升，免费下载[下载]

To:JXM

需要重编译