One way:

For X = 1 to 7
Range("A" & X) = {Calcualtion} ' Where A=Column and X = Row
Next X

Regards

Trevor


"Biomed" wrote in message
...
Excel 2000 SR-1

I am trying to write a VB code using a For - Next statement to calcualate
cells.
The basic satement is:

For X = 1 to 7
[A(x)] = {Calcualtion} ' Where A=Column and X = Row
Next X

Is there a correct way in VB code? This would greatly reduce the code I
would have to write otherwise.