Excel 不读取值

我在源工作簿中有两行数字。我想将第一行复制到另一个工作簿中，然后将它下面的行作为源的第一行和第二行的总和。我的代码运行，但我似乎无法让excel读取第二行的值。（aa是源工作簿的工作表）

---

您没有将

Range（）

调用链接到

With

块<代码>对于i=1到.Range（.Range（“U2”）.Offset（1，0），…等等谢谢你的回复，蒂姆！我想我现在明白了。

With aa
    For i = 1 To Range(Range("U2").Offset(1, 0), Range("U2").Offset(1, 0).End(xlToRight)).Cells.Count
        Set NewValue = Range("U2").Offset(1, i - 1)
        TargetWB.Worksheets("Sheet1").Range("D2").Offset(1, i - 1).Value = Range("D2").Offset(0, i - 1) + NewValue.Value
    Next
End With