[已解决]请问错在哪里

yxwhuiming

Sub t2()
Dim x As Integer
  Fox x=2 To 20
   Cells(x, 4) = "=100*x"
  Next x
End Sub
运行结果讲我缺少语句，难道我和老师下面这个有什么不同吗？请老师指点一下，错在哪里？谢谢
Sub t2()
Dim x As Integer
  Fox x=2 To 6
   Cells(x, 4) = "=b" & x & "*c" & x
  Next x
End Sub

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-2-25 15:35

你把for写成了fox了。

跳转到最佳答案楼层

hwc2ycy

1.    Cells(x, 4) = "=100*x"

复制代码

改为

1.    Cells(x, 4) = "=100*" & x

复制代码

试试。

hwc2ycy

你把for写成了fox了。

yxwhuiming

谢谢！，知道了！应当是这里错了。

hwc2ycy

1. Sub t2()
   
2.     Dim x As Integer
   
3.     For x = 2 To 20
   
4.         Cells(x, 4) = "=100*" & x
   
5.     Next x
   
6. End Sub

复制代码

yxwhuiming

看来一点马虎都不行呀，for就是for，fox就是fox ，差多了，再次感谢！