'Range(Cells(i, j)) = i * j
Cells(i, j) = i * j
Next j
Next i
End Sub
总之就是搞不定
还有for i=1 to 10 do range("A"&i)可以这样写
那么如果我是横过来的行要循环,怎么写呢?
...全文
241打赏收藏
我出离愤怒了!!
TMD到现在最简单的VB里一个小学生程序都搞不定 Sub 按钮1_Click() For i = 0 To 10 For j = 0 To 10 'Range(Cells(i, j)) = i * j Cells(i, j) = i * j Next j Next i End Sub 总之就是搞不定 还有for i=1 to 10 do range("A"&i)可以这样写 那么如果我是横过来的行要循环,怎么写呢?
Private Sub CommandButton1_Click()
Dim i As Integer
Dim j As Integer
For i = 1 To 10
For j = 1 To 10
ThisWorkbook.Sheets(1).Cells(i, j).Value2 = i * j
Next j
Next i
End Sub