将一系列相邻列从Sheet1复制到Sheet2

时间:2018-11-19 11:03:36

标签: copy

我正在尝试使用以下代码将相邻的U:W列从sheet1复制到sheet2,但无法正常工作...什么地方出错了??

Dim rngUW As Range
Set rngUW = Worksheets("Sheet1").Range(Range("U2:W2"), Range("U1:W1").End(xlDown))
Worksheets("Sheet2").Range("C1").Resize(rng.Rows.Count, rng.Columns.Count).Cells.Value = rng.Cells.Value

0 个答案:

没有答案