我想在EXCEL表格里使用数据导入，但一个表格里有30个表格，应该怎样可以一次全部导入，不用一张张去复制

答案:2 悬赏:50 手机版

解决时间 2021-07-18 09:37

提问者网友：谁的错
2021-07-18 00:42

如上

最佳答案

五星知识达人网友：山君与见山
2021-07-18 01:21

只有用宏控制了

全部回答

1楼网友：洒脱疯子
2021-07-18 02:03

打开有30个表格的Excel，再新建一空白Excel，同时按Alt和F11，进入VB界面，点菜单的插入，模块，在右边出来的窗口中粘贴以下代码（把粗体字改为30个表格的excel文件名）： Sub test() Application.ScreenUpdating = False Dim xx As Workbook Set xx = Workbooks("telbook.xls") For Each sh In xx.Sheets sh.UsedRange.Copy ThisWorkbook.Sheets(1).Range("A65500").End(xlUp).Offset(1, 0).Select ActiveSheet.Paste Next End Sub Application.ScreenUpdating = True 按F5运行此宏，所有数据到了一起。

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息