复制工作簿的方法(如何复制整个Excel工作表)
1.如何复制整个Excel工作表
可以先Ctrl+A全选再Ctrl+C复制。
1、以excel2010版本为例，如下图所示，要复制整个表格的数据；
2、首先把鼠标放在有数据的任一单元格，点击选中该单元格；
3、按Ctrl+A全选有数据的单元格，如下图所示所选单元格变色即表示已全选中；
4、再按Ctrl+C复制，即该表格处于复制状态了，去目标区域粘贴即可；
5、如果要复制整个工作表，包括空白部分，那么把鼠标放在空白单元格，即没有数据的单元格，点击；
6、按Ctrl+A全选，即可选择整个excel单元格了，再按Ctrl+C复制，去粘贴就好。
2.excel工作簿怎么复制工作表
Excel中可以全选工作表，然后复制，再到另外一张工作表中粘贴，即可将整个工作表复制到另外的工作表中。
软件版本：Office2007
方法如下：
1.首先，全选工作表。这里介绍两个方法：①左上角点击行列交汇处②按下Ctrl+A
2.按下Ctrl+C键，这时候会看到整个工作表被复制了：
3.到一个新的Excel工作表中，参考步骤1，全选：
4.按下Ctrl+V，这时候，就将原来的整个工作表全部复制到新的工作表中了：
3.EXcel 表格如何快速批量复制粘贴的方法
1、选中你要复制到的2113单元格，假如我们要复制李星到A4单元格，那么就要选中A4单元格。
2、按下ctrl+D，你就会5261看到上面的单元格被复制到下面了。
3、假如你要复制多个单4102元格，你可以选中多1653个单元格如图所示。按下ctrl+d，就可以将上面所有的单元格数据复制。
4、按下ctrl+r，快速内复制左侧的单元格，你会看到这个效果。
5、这是容复制之后的效果。
4.如何把多个excel工作簿的内容复制到一张工作簿上面
你可以手动完成这一工作，但这个工作可能会花费你一整天的时间。要完成合并工作，最好使用宏，这样只需花几分钟便可搞定。本文所介绍的技巧将向你说明如何创建这样一个宏，看看如何使用宏来节省你的宝贵时间。（本技巧可应用于Microsoft Excel 97、Excel 2000、Excel 2002、和Excel 2003。）
Joydip Das在合并数个工作簿时遇到了问题。这些工作簿总数约有200，保存在同一文件夹中，其中大多数工作簿中只包含一个单独的工作表，但有些工作簿包含多个工作表。这些工作簿中的工作表需要被添加到一个新的工作簿中。
合并数量如此巨大的工作簿的最简单方法——如果经常要这样做的话——是使用宏。下面的宏会显示一个对话框，提示你选择要合并的文件。（你可以通过按下Ctrl键单击的方法选择多个工作簿。）它会使用代码在你所选的工作簿列表中循环，打开每个工作簿并将其中的工作表移动到工作簿的末尾。
由于下面全是图文，我就留个网址，你可以电进去看看，很详细
5.excel如何把多个工作薄的内容快速复制到一个工作薄中
必须用VBA:
新建一个工作表，命名后保存到和与合并的多个个文件同一个文件文件夹，摁 alt + f11，双击工程资源管理器里面的sheet1(sheet1)，在右侧的代码区粘贴如下代码。运行。等候一会就OK了。
Sub 合并当前目录下所有工作簿的全部工作表（）
Dim MyPath, MyName, AWbName
Dim Wb As Workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
.Cells(.Range("A65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range("A65536").End(xlUp).Row + 1, 1)
Next
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range("A1").Select
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation， "提示"
End Sub
