Cells (1, destination.Columns.Count).End(xlUp).Column If emptyColumn > 1 Then emptyColumn = emptyColumn + 1 End If source.Range("C1:Z1000").Copy destination.
確定! 回上一頁