做个宏命令,写两行代码,执行以下,解决~
先在选项里,把“开方工具”打开
按alt+F11,打开VBA编辑器,鼠标右键,插入一个模块
选中新添加的模块,然后在右边写代码,直接复制过去就成~
Sub aaa()
Dim a, b
For a = 2 To 59
For b = 1 To 34
sheet60.Cells(b, a - 1) = Sheets(a).Cells(b, 6)
Next
Next
End Sub
在excel里点“开发工具”再点“宏”
选择这个“aaa”,再点执行~
完成~
说明一下:这是把sheet2~59的F1~F34放到sheet60的1~34行里了,A列就是sheet2,B列是sheet3.....执行前,要保证有sheet60这张表~