主题：请大神们帮帮忙

单独执行这个代码有没问题？

Dim i As Integer = val(Tables("表0101").Rows(0)("系统单元_参数"))
Dim idx As Integer = 11
For j As Integer = i-1 To Tables("表0101").Rows.Count-1
    If idx < Tables("表0101").Rows.Count
        Tables("表0101").Rows(idx)("W参数_2") = Tables("表0101").Rows(j)("原始数据_一")
        idx += 1
    Else
        Exit For
    End If
Next