0
Sub Sample()
Dim wsI As Worksheet, wsO As Worksheet, ws2 As Worksheet
Dim LastRow As Long, i As Long, j As Long
Set wsI = Sheets("EC6")
Set wsO = Sheets("2")
LastRow = wsI.Range("A" & Rows.Count).End(xlUp).Row
j = 1
With wsI
For i = 1 To LastRow
wsI.Rows(i).Copy wsO.Rows(j)
j = j + 1
Next i
End With
End Sub
如何仅将wsI的值复制到wsO?将工作表复制到工作表 - 如何仅复制值?
您好保罗,谢谢您的帮助。 – w0rksh0p