我想一次性选择（或复制）工作簿中的多张表到另一工作簿
可以参考如下帖子：
http://club.excelhome.net/thread-917959-1-1.html
1 nm = Array("Sheet1", "Sheet2", "Sheet3") 2 For i = 0 To UBound(nm) 3 Sheets(nm(i)).Copy after:=Workbooks(newwjm).Sheets(Sheets.Count) 4 Next
可以参考如下帖子：
http://club.excelhome.net/thread-917959-1-1.html
1 nm = Array("Sheet1", "Sheet2", "Sheet3") 2 For i = 0 To UBound(nm) 3 Sheets(nm(i)).Copy after:=Workbooks(newwjm).Sheets(Sheets.Count) 4 Next
