Sub copySheet()Dim ws1 As WorksheetSet ws1 = ThisWorkbook.Worksheets("sheet16")ws1.Copy ThisWorkbook.Sheets(Sheets.Count)End Sub
我是女生,选中整个工作表复制到指定的根目录下就行
可以写程序做到,但说来话长
可以的