一:在单元格中输入公式
1:在单元格中输入普通公式
Sub t1()
Range("d2") = "=b2*c2"
End Sub
结果:
2:指定多列,进行普通公式计算
Sub t2()
Dim x As Integer
For x = 3 To 5
Cells(x, 4) = "=b" & x & "* c" & x
Next x
End Sub
结果:
一:在单元格中输入公式
1:在单元格中输入普通公式
Sub t1()
Range("d2") = "=b2*c2"
End Sub
结果:
2:指定多列,进行普通公式计算
Sub t2()
Dim x As Integer
For x = 3 To 5
Cells(x, 4) = "=b" & x & "* c" & x
Next x
End Sub
结果: