For j = 0 To wcData.Tables(0).Rows.Count - 1
For i = 900 To 1700
wcData.Tables("db").Rows(j)("range") = i
Next
Next
пытаясь вставить «i» в каждую ячейку столбца «диапазона»
любое предложение.
Спасибо.
For j = 0 To wcData.Tables(0).Rows.Count - 1
For i = 900 To 1700
wcData.Tables("db").Rows(j)("range") = i
Next
Next
пытаясь вставить «i» в каждую ячейку столбца «диапазона»
любое предложение.
Спасибо.
Dim rowOffset As Integer = 900
For j = 0 To wcData.Tables(0).Rows.Count - 1
wcData.Tables("ratingout").Rows(j).Item("range") = rowOffset + j
If i >= 1700 Then
Exit For
End If
Next
это сработало на данный момент. Спасибо