Farseer

DAX2012学习中......

导航

2013年1月4日 #

多个文本文件分别拷贝到同一个Excel的不同Sheet

摘要: 遇到一个需求,需要将多个文件拷贝到同一个Excel的不同Sheet中,每个文本文件一个Sheet,Sheet的名字用文本文件的名字,使用VBA可以很方便地实现这个功能,不过一直对于VB的语法有些生疏,放在这里做备份。Sub importTextFiles()'' Import Text Files to a Excel File.''Dim FilePath, FileNameFilePath = "D:\Items\"FileName = Dir(FilePath + "*.txt")Do While FileName 阅读全文

posted @ 2013-01-04 22:22 佛西亚 阅读(1224) 评论(1) 编辑