Excel VBA单元格值未返回值

Question

我只是想从一系列细胞中获取几个值。它没有返回任何值。我做错了什么？

我在单元格B2到B15中有各种数字。

Dim num As String
For n = 5 To 16
    num = Worksheets("Info").Cells(2, n).Value
    Debug.Print num
    Worksheets("Info").Cells(4, n).Value = num
Next n

感谢。

Answer 1

根据the Microsoft documentation，单元格索引的参数是行然后是列，不是列然后是行。该链接页面上的示例通过将5, 3用于单元格C5来说明这一点：

  

此示例将Sheet1上的单元格C5的字体大小设置为14磅：   Worksheets("Sheet1").Cells(5, 3).Font.Size = 14

因此，您对Cells的论证应分别为n, 2和n, 4。