问题已解决
老师,怎么在一个EXCEL钟复制一个工作表一下子可以复制为好几个相同的工作表(保证复制过去的时候连设置好的打印格式也一起复制过去。用复制-粘贴的话需要对每个工作表进行重新调整打印格式)
温馨提示:如果以上题目与您遇到的情况不符,可直接提问,随时问随时答
速问速答可以将要复制的工作表,在工作表名处右击,选择移动和复制工作表。这样可以保证打印格式
2020 06/20 13:46
84785021
2020 06/20 13:51
老师,这样只能一次复制一个!不能一次复制多个么?我想做200个工作表!
李李老师
2020 06/20 13:58
批量复制,可以用vba,操作前保存好初始数据!!!
在VBA中用Inputbox函数来取得与批量复制的数量,编写代码执行批量复制的程序即可,几行代码即可,想要复制多少个工作表都行。 代码如下:
Sub macro2()
Dim K As Single
Dim N As Single
K = Application.InputBox(prompt:="请输入欲拷贝表格的数目", Type:=1)
N = 1
Application.ScreenUpdating = False
Do Until N = K
If N > K Then
Exit Sub
End If
ThisWorkbook.Sheets("Sheet1").Activate
Cells.Select
Selection.Copy
Sheets.Add After:=Sheets(Sheets.Count)
Cells.Select
ActiveSheet.Paste
N = N + 1
Loop
Application.ScreenUpdating = True
End Sub
上述代码默认复制sheet1到新建表格中,通过修改代码中的相应名称可以改变欲复职的初始表格。在使用上述代码前,请做好原始数据备份。
84785021
2020 06/20 14:03
VBE函数 这个是不是WPS中不适用?