发布网友 发布时间:2022-04-23 12:14
共2个回答
热心网友 时间:2023-10-13 01:27
在新建一个工作表,按alt+F11,视图--代码窗口,粘贴一下代码
Sub 数据集中()
Sheets(1).Select
For i = 12 To ThisWorkbook.Sheets.Count
Sheets(i).UsedRange.Copy
Sheets(1).[A65536].End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
Next i
Application.CutCopyMode = False
end sub
然后运行。OK
热心网友 时间:2023-10-13 01:27
这个好办,你拿个样表给我,我弄好给你
这个还要用VBA?杀鸡用牛刀