请教VBA语法！

wantosay

我写了一很简单的代码，可是老不能执行，主要目的想将另一表中的数值按一定要求复制到另一表中，进行循环时可能语法有问题，请教各位在VBA中单元格取值能否用Range("b" & [i+4])这种形式（若i=4,则应取B4单元格的值赋予E4），应怎样写？

Private Sub CommandButton1_Click()
Dim i As Integer
For i = 4 To 44
Worksheets("Project Work time Stat").Range("S2") = Range("B" & )
Range("e") = Worksheets("Project Work time Stat").Range("b" & [i+4])
'Range("F" & ) = Worksheets("Project Work time Stat").Range("B" & [i+5])  
'Range("G" & ) = Worksheets("Project Work time Stat").Range("B" & [i+6])  
Range("H" & ) = Worksheets("Project Work time Stat").Range("B" & [i+7])  
'Range("I" & ) = Worksheets("Project Work time Stat").Range("B" & [i+8])  
'Range("J" & ) = Worksheets("Project Work time Stat").Range("B" & +9])
Next
End Sub

pureshadow

range("a1")
range("a" & i+4)

kaixixi

我也遇到了同样的问题,终于解决了,谢谢……