阿Q吧 > EXCEL求VBA代码，点击按钮实现从未打开的EXCEL表sheet1文件复制内容到当前已打开的EXCEL表sheet1

EXCEL求VBA代码，点击按钮实现从未打开的EXCEL表sheet1文件复制内容到当前已打开的EXCEL表sheet1

2024-11-22 03:52:43

推荐回答（4个）

回答1：

附件是例子，自己根据情况自行修改

回答2：

一般代码这样写：

sub xxx()
    Workbooks.Open Filename:="你要打开的文件名字，例如c:\a.xls"
    sheet1.[a1].AutoFilter
    sheet1.[a:o].copy ThisWorkbook.sheet1.[a:o]
    ActiveWorkbook.Close
end sub

程序三个语句，第一个打开文件，第二个取消筛选(如果原来没有筛选会加上筛选，但这并不影响后面的复制)，第三个语句完成复制，第四个关闭文件

回答3：

你自己现在代码写到怎样的程度了？

回答4：

代码由点长