如何批量在同一文件夹下,对多个excel的文件里的表格进行批量处理,提取如1-6列的内存,其它的都删除?谢谢

 我来答
flagshipzx
2012-03-14 · 超过17用户采纳过TA的回答
知道答主
回答量:77
采纳率:0%
帮助的人:47.5万
展开全部
使用宏,下面的代码是从当前excel表格所在文件夹下,依次打开所有的excel文件(限xls结尾的),
Dim fs As FileSearch, fp, fname, n
Set fs = Application.FileSearch
fp = ActiveWorkbook.Path
fs.LookIn = fp
fs.LookIn = fp
fs.Filename = "*.xls"
fs.Execute
ChDir (ThisWorkbook.Path)
For n = 1 To fs.FoundFiles.Count
fname = fs.FoundFiles(n)
Workbooks.Open (fname)
'这里填写打开每个表格以后要做的工作,像你的要求就是删除前六列以后的列
next
帐号已注销
2012-03-13 · TA获得超过474个赞
知道小有建树答主
回答量:1087
采纳率:0%
帮助的人:504万
展开全部
你把这些文件中的一个数据放到一个excel中的不同的工作簿的应该可以实现,但是多个文件应该没有办法吧.
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式