Dim i As Integer
Dim s As Integer
For i = 0 To 16
s = s + DatagridView2(i , 0).Value
Next i
Dim sa As Integer
For ia = 0 To 16
sa = sa + DatagridView2(i a, 1).Value
Next ia
If s = 11 Then
DatagridView2(1 7, 0).Value = s
Else
DatagridView2(1 7, 0).Value = 0
End If
If sa = 11 Then
DatagridView2(1 7, 1).Value = sa
End If
Is there a way to do the same till row 100.
Without having to change this 100 times.
"Dim i As Integer
Dim s As Integer
For i = 0 To 16
s = s + DatagridView2(i , 0).Value"
Thanks in advance
Dim s As Integer
For i = 0 To 16
s = s + DatagridView2(i , 0).Value
Next i
Dim sa As Integer
For ia = 0 To 16
sa = sa + DatagridView2(i a, 1).Value
Next ia
If s = 11 Then
DatagridView2(1 7, 0).Value = s
Else
DatagridView2(1 7, 0).Value = 0
End If
If sa = 11 Then
DatagridView2(1 7, 1).Value = sa
End If
Is there a way to do the same till row 100.
Without having to change this 100 times.
"Dim i As Integer
Dim s As Integer
For i = 0 To 16
s = s + DatagridView2(i , 0).Value"
Thanks in advance