alex_bn_lee

摘要： 文件夹2.wind_numerical_excello中有多个文件夹，每个文件夹中都有不定数目的Excel表格实现通过VBA，为每个Excel文件加入一个表头，即：插入一行，然后加入内容Sub jiabiaotou() Dim fs, f, fds, fd, fls, fl Set fs = CreateObject("scripting.filesystemobject") Set f = fs.getfolder("F:\桌面\2.wind_numerical_excello") Set fds = f.subfolders For Each fd 阅读全文