请教下各位：在excel中，一个工作薄里面的两张工作表怎么同时拖动复制出新工作表来，

如何将Excel里一个工作薄内的多个工作表复制到一张新表里？~

1.需要把多个excel表都放在同一个文件夹里面，并在这个文件夹里面新建一个excel。如图所示：

2.用microsoft excel打开新建的excel表，并右键单击sheet1，找到“查看代码”，单击进去。进去之后就看到了宏计算界面。如图所示：

3.然后把下面这些宏计算的代码复制进去，然后找到工具栏上面的“运行”下的“运行子过程/用户窗体”，代码如下，如图所示：
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("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)
Next
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"
End Sub

4.运行之后，等待10秒针左右，等运行完毕，就是合并完成之后，会有提示，点确定就可以了。查看合并后的数据，有5000多行，就是同一个文件夹里面17个excel表数据合并后的结果。效果如图所示。

excel 中将一个工作表批量复制出很多个相同的工作表的方法可以采用下面的方法：
1、要复制的表是连在一起的就好办，在表名的地方，先点击最左边要复制的表，然后按住shift键，点击最右边要复制的表，然后在表名的地方单击右键，选择“移动或复制工作表”，其中工作簿的下拉框中可选择“新工作簿”或现有打开的工作簿，确定复制的位置，最下面可勾上“建立副本”（如果不勾，将是移动表格），确定即可。
2、可以录制一个宏，然后在需要的时候执行这个宏就可以了。
3、编制单独的程序来实现，可以通过vb,vc或其它的高级语言通过编程来实现，会更文件地来完成这样的功能。

按CTRL键，用鼠标分别点击两个工作表的标签，然后在标签上按住，往右拉至空位，即可复制。

---

英德市17038037914： 请问大家一下!如何在Excel中设置同个文件夹中一个工作薄输入数据其他几个工作薄同时产生该数据??? - ？
仍洋复方： 那就必须先把其他相关文件夹中的数据设置成=另外一个文件中的某个单元格的数据 格式为='路径\[文件名.XLS]工作表名'!单元格号 示例='F:\My Documents\[销售明细表.xls]Sheet1'!$A$1 单元格的相对引用和绝对引用根据自己的实际情况来,相对引用方便复制到其他单元格

英德市17038037914： 在EXCEL中如何在第一个工作表中,获取其他工作表的数据?请教各位高手,谢谢! - ？
仍洋复方： =index(SHEET1!A$1:$A$100,SMALL(IF(SHEET1!$B$1:$B$100=＂＂,ROW($1:$100),＂＂),ROW(A1)),1) CTRL SHIFT 回车结束,向下拖

英德市17038037914： excel中怎么统计每个工作表中的数据 - ？
仍洋复方： 你单独的选择一个表格,然后写表达式的时候,=sum(里面的选择项,如果是当前的那个表,你只写a1+b1就可以了,如果想把别的表格里的数据进行计算的话,就直接点击到别的表格,然后再点击想要进行计算的那个数据,然后点回到原来的那个表就可以了

英德市17038037914： 怎么在excel中一个单元格内打出姓名/日期要姓名在上半个格,日期在下半个格?请教 - ？
仍洋复方： 可以先把单元格分成上下两个三角形再输入文字. 工具:excel2010版本. 1、如下图,首先选中这个单元格,然后点击页面上方的“插入”; 2、在插入菜单栏下,点击下面的形状,在弹出框里选择直线图标; 3、则可直接在单元格里画分割线了,如下图,画好分割线后可在页面上方更改线条颜色; 4、再在单元格里输入名字,用空格键和换行来移动这些文字的位置; 5、如下图则可成功的在excel中一个单元格内打出姓名/日期,姓名在上半个格,日期在下半个格了.

英德市17038037914： 用Excel怎么计算工龄 - ？
仍洋复方： D3的年和月分开,D3是1956,D4是10,然后E3是年工龄,E4是月工龄,那么 E3=2006(当年)-D3-1 E4=(12-D4)+4(当月)+1 如果不用这个方法就要用宏.比如复杂.

英德市17038037914： 在excel中怎么一下能在几页中都添加或删除一行 - ？
仍洋复方： 鼠标单击工作表标签选择一个工作表,按住ctrl(选择不连续的工作表)或shift(选择连续的工作表)再单击其它工作表,这时对一个工作表的操作(增加或删除)会应用到选择的其它工作表上.

英德市17038037914： 在excel的同一个工作表中,当sheet1中的A1满足一个条件时,则sheet2中的A行等于sheet1中的A行,如不满足条件,则继续对下一行进行判断.？
仍洋复方： 很拗口,可能没理解.举例说明: 在Sheet1的A1、A2、A3、A4输入 b、d、张三、2 在B1、B2、B3、B4输入 1、2、3、4 在C1、C2、C3、C4输入 x、y、z、?? 在Sheet2里,在单元格A1输入 d 在B1输入 =VLOOKUP(A1,Sheet1!$A:$D,colun(...

英德市17038037914： 请教高人:excel中某一列的工作表中单元格出现数字,请将这个单元格一行显示到下一个工作表中呢公式怎么设 - ？
仍洋复方： 在sheet2的A2中键入公式:=IF(Sheet1!$D2=＂＂,＂＂,Sheet1!A2) 右拉,下拉公式即可.(然后D列可利用排序“升序”将显示的数据排在上面.)

英德市17038037914： 请教个位在excel中,需要进行如下排序,应该怎样操作,请详述,谢谢, - ？
仍洋复方： 在E2输入:=IF(A2=＂＂,INDEX(C:C,SMALL(IF(COUNTIF(A$1:A$100,C$1:C$100＂),4^8,ROW($1:$100)),ROW()-COUNTA(A:A)))...

英德市17038037914： 请教各位大虾 如何在Excel中输入一个函数,例如Y=0.1325X^2+2.56X - 0.5623, 若知道了Y值,如何设置一个公 - ？
仍洋复方： 例如:你可以把A1单元格当作X,B1单元格当作Y,那么在B1单元格输入:=0.1325*a1^2+2.56*a1-0.5623,确定后,B1单元格显示-0.5623(因为此时A1为0),现在点击工具--单变量求解,在目标单元格输入B1(或点击B1单元格),目标值输入Y值(如5),可变单元格输入A1(或点击A1单元格),确定就行了,这时你可能看到B1单元格显示为4.9999……,你把单元格的列宽变小一点就变成5了,你再执行刚才的步骤,把目标值变成你需要的Y值就可以求X的值了