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

mpy2003 · 发表于 2012-12-4 12:19

longwin 发表于 2012-12-4 11:46
你是要实现第二个问题吗？

对的，如果能按先搜小范围再搜大范围，这样效率就更快了

longwin · 发表于 2012-12-4 13:49

mpy2003 发表于 2012-12-4 12:19
对的，如果能按先搜小范围再搜大范围，这样效率就更快了

这样虽然效率高但是通用性差啊，如果单纯是这几个目录的话是简单

mpy2003 · 发表于 2012-12-4 14:27

longwin 发表于 2012-12-4 13:49
这样虽然效率高但是通用性差啊，如果单纯是这几个目录的话是简单

说到通用性肯定每一个公司都不一样的存档路径，但是每一个人可以根据自己的公司情况更改啊，主要是方法
对于我这种入学不深的人来说，能知道怎么改就得了。主要还是要大哥能列以我那个例子做一个出来，以后就可以模仿改动一下了。

longwin · 发表于 2012-12-4 14:35

mpy2003 发表于 2012-12-4 14:27
说到通用性肯定每一个公司都不一样的存档路径，但是每一个人可以根据自己的公司情况更改啊，主要是方法
...

你用这个改就行啊，vba里面已经加了注释的，把要搜索的路径及文件名改一下就行了

mpy2003 · 发表于 2012-12-4 14:37

本帖最后由 mpy2003 于 2012-12-4 14:42 编辑

longwin 发表于 2012-12-4 13:49
这样虽然效率高但是通用性差啊，如果单纯是这几个目录的话是简单

就比如说，你目前设置的路径是fpath = ThisWorkbook.Path 就是根目录了

可不可以这样设计，目录A = 1B ,执行你的搜索代码，没有结果再它的外一层目录A = Mid(A, 1, InStrRev(A, "\"))，再执行搜索代码，如果当前目录是根目录“目录”时（不要搜索根目录），则停止，有结果就列出结果，没结果则弹出提示

我的构思是这样的不知道要怎么样编写代码？
是不是还是利用按钮，不太懂这个循环要放在哪个位置

mpy2003 · 发表于 2012-12-4 14:54

本帖最后由 mpy2003 于 2012-12-4 14:55 编辑

longwin 发表于 2012-12-4 14:35
你用这个改就行啊，vba里面已经加了注释的，把要搜索的路径及文件名改一下就行了

大哥，我还有一种分析就是，我肯定知道它是在两个子文件夹下面里的一个，比如我要搜QQQQQ.TEXT文件
我知道它肯定是在1B文件夹下，而且知道是在2和3里面，所以想直接搜索2，没有搜索到就搜3，没有搜到就停止并提示。这样搜索范围就大的减小了。
这样你的程序要怎么改？就是搜索指定的几个互不相关的文件夹。我想这种情况应该比较实际一点。
大哥您不要烦哦，因为这些都是因为从事工作所得出来的一些总结，我想应该很多人都需要

longwin · 发表于 2012-12-4 21:07

mpy2003 发表于 2012-12-4 14:54
大哥，我还有一种分析就是，我肯定知道它是在两个子文件夹下面里的一个，比如我要搜QQQQQ.TEXT文件
我知 ...

你可以将附件发上来，写清楚要求，我给你看看

mpy2003 · 发表于 2012-12-5 15:26

longwin 发表于 2012-12-4 21:07
你可以将附件发上来，写清楚要求，我给你看看

大哥，不好意思这么久才弄上来，因为有些资料我要整理，现上传附件，谢谢大哥能帮助我

样品.haozip01.zip (350 KB, 下载次数: 8)

样品.haozip02.zip (350 KB, 下载次数: 8)

样品.haozip03.zip (350 KB, 下载次数: 8)

样品.haozip04.zip (277.01 KB, 下载次数: 8)
附件是用的好压压缩软件分的包，如果不能正常解压包，2345好压下载地址:http://www.haozip.com/

要求基本都写在宏命令里，密码消息给你

liweikundrag · 发表于 2012-12-28 20:36

新人刚注册，向各位学习

ww0000 · 发表于 2014-9-27 17:37

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

老兄，上个低版本的好吗？

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

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