通过前三篇的介绍,对VBA有了更进一步的认识了吧。
(一) VBA简介
(二) VBA跨Excel读取数据
(三) VBA模糊查找数据
现在我直接贴出我写的其中一个sub的内容吧。完整的内容从资源里面看吧
Sub GetATValue()
Debug.Print
Debug.Print "Start ++++++++++++++++++++++++++++++++++++"
Dim RootFolder, FolderArray(), FolderName, CurrentFolderPath, FileName, CurrentFilePath