excel vba 重复复制数据的值 粘贴到另一个新建SHEET表中答:s = Array(1, 5, 8)t = Array(2, 6, 7)Sheets("目标表").Select With Sheets("原始表")For i = 0 To UBound(s)rs = .Cells(65536, s(i)).End(xlUp).Row - 1 Cells(65536, t(i)).End(xlUp).Offset(1, 0).Resize(rs, 1).Value = .Cells(2, s(i)).Resize(rs, 1...