将字符串写入单元格

Question

这应该非常简单，但出于某种原因，我遇到了问题。代码应查看特定单元格，如果它符合IF语句的条件，则将数据写入另一个单元格。

dim i as integer
i = 1

For i = 1 To 674
    If Sheets("Provider Data").Cells(i + 3, 60).Value2 = 8 Then
        Sheets("Sheet1").Cells(2 + i, 1).Value2 = Sheets("Provider Data").Cells(i + 3, 3).Value2
    End If
Next i

由于某种原因，数据不会写入单元格。我已经使用消息框进行了调试，并且If语句正确地选择了匹配8的单元格，但由于某种原因，

的内容

sheets("Provider Data").cells(i+3,3).value2

没有写入单元格。我错过了什么？我应该提到要从（i + 3,3）写入单元格的数据是字符串