摘要:
'!!!! Replacement solution including searching in subdirectories !!!!!//------------------------------------------------------------------------------------------------Sub FileSearchByHavrda_Example_of_procedure_calling()'' Example of FileSearchByHavrda procedure calling as replacement o 阅读全文
摘要:
休息日,无聊的上Excel Home看看有啥东东可学习,有啥问题能帮帮忙。看到很多帖子都是求助遍历特定文件夹下文件的实现方法。有朋友说03版Excel有FileSearch对象可以遍历文件夹下文件,07版中没有了FileSearch对象,不知如何遍历文件。我想03版能做的事,07版肯定能做啊,要不然不是倒退?于是搜寻一番,还真是取消了FileSearch对象啊!不过还有Scripting.FileSystemObject可以用,实现如下:Sub main() Dim fs, fold, fls, fl Set fs = CreateObject("Scripting.FileSyst 阅读全文