求大侠建立指定文件的超链接

mpy2003 · 发表于 2012-12-2 23:17

本帖最后由 mpy2003 于 2012-12-12 11:25 编辑

建立指定文件的路径，含子文件夹.zip (9.78 KB, 下载次数: 15)
见附件，目录有多级文件夹，我不需要全部列出指定文件夹下的文件链接，
我只需要输入我需要的文件名，不管它在哪个角落都能把它的超链接列出来，以方便快速的打开，省去很多查找的时间
求大侠能帮助我实现这样的功能

山风 · 发表于 2012-12-3 08:36

文件地址不知道如何链接？

mpy2003 · 发表于 2012-12-3 08:52

本帖最后由 mpy2003 于 2012-12-3 08:54 编辑

山风发表于 2012-12-3 08:36
文件地址不知道如何链接？

就是在B4中输入一个名字，如果目录文件夹里（含子文件夹）有这个文件，则在C4单元格内显示B4单元格输入的名字，并有可以打开的链接，如果不存在则弹出提示“文件不存在”
我目前只知道在指定文件夹下建立链接，但是不知道搜索子文件夹下的链接
比方说：指定路径是目录，如果目录的根目录下有文件，我可以建，但是在子目录下有，我就搜索不到。求大侠能帮我实现子文件夹中有也可以搜索到

山风 · 发表于 2012-12-3 09:08

看看有没有用

Sub 生成目录() '有子文件夹也查到
Set fs = Application.FileSearch
With fs
.LookIn = "D:\暂用\" '设置要查找的起始目录
.Filename = "*.*"
.SearchSubFolders = True '是否查找子目录
.Execute '根据上面的设置执行查找
For i = 1 To .FoundFiles.Count '遍历文件
a = Dir(.FoundFiles(i))
Cells(i + 1, 3) = a
Next i
End With
End Sub

mpy2003 · 发表于 2012-12-3 12:17

山风发表于 2012-12-3 09:08
看看有没有用

不太懂VB，filename怎么引用B4？还有就是2007听说不能用iflesearch
能不能下载我的附件做一个让我学习，谢谢

longwin · 发表于 2012-12-3 17:06

mpy2003 发表于 2012-12-3 12:17
不太懂VB，filename怎么引用B4？还有就是2007听说不能用iflesearch
能不能下载我的附件做一个让我学习， ...

TEST.rar (19.6 KB, 下载次数: 40)

应该是达到了你的要求，看看吧。

mpy2003 · 发表于 2012-12-4 09:25

本帖最后由 mpy2003 于 2012-12-4 09:26 编辑

longwin 发表于 2012-12-3 17:06
应该是达到了你的要求，看看吧。

功能差不多是这种意思，就是有点不对的就是不能精确查找，比如输入AAA也会打开AAAAA文件。还有就是下次输入的如果不存在，链接地址还是上次的没有清空，打开的时候还是打开上次查到的，让人以为是已经找到。其他的功能都已经实现，希望大侠能优化一下，感激不尽

longwin · 发表于 2012-12-4 09:55

mpy2003 发表于 2012-12-4 09:25
功能差不多是这种意思，就是有点不对的就是不能精确查找，比如输入AAA也会打开AAAAA文件。还有就是下次输 ...

TEST.rar (20.99 KB, 下载次数: 33)
实现了精确查找【后缀为.txt】,提示文本改变了，更加直观了，另外在b4单元格内录入查找内容后直接回车就能找了，不用点按钮了。

mpy2003 · 发表于 2012-12-4 10:45

longwin 发表于 2012-12-4 09:55
实现了精确查找【后缀为.txt】,提示文本改变了，更加直观了，另外在b4单元格内录入查找内容后直接回车就 ...

很不错，可以请都几个问题吗？
1.必须要另外一个工作表写出来吗？
2.请问搜索过程是什么样子的？是不是可以实现我另一个贴子的问题？http://club.excelhome.net/thread-949228-1-1.html
3.我还是要实现按钮点，不需要直接回车，因为我在做一个工具是用窗体按钮调用这些地址

我的工具有好多功能都是大哥您的指导，希望我完成之时你能帮助优化一下程序，目前看起来运行有一顿一顿的现象

longwin · 发表于 2012-12-4 11:46

mpy2003 发表于 2012-12-4 10:45
很不错，可以请都几个问题吗？
1.必须要另外一个工作表写出来吗？
2.请问搜索过程是什么样子的？是不是 ...

你是要实现第二个问题吗？

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

[已解决] 求大侠建立指定文件的超链接

评分

评分