F
FMNT80
What I am trying to do is use an array to 'flip'
a sequence of numbers.
The code doesn't work :-(
Sub Panel_Flip()
Dim store(3) As Double
For i = 3 To 0
store(i)=ActiveCell.Offset(0,1+i).Value
Next
For i=0 to 3
ActiveCell.Offset(1,0).Value=store(i)
Next
End Sub
I need to know where I am going wrong...
Thanks
a sequence of numbers.
The code doesn't work :-(
Sub Panel_Flip()
Dim store(3) As Double
For i = 3 To 0
store(i)=ActiveCell.Offset(0,1+i).Value
Next
For i=0 to 3
ActiveCell.Offset(1,0).Value=store(i)
Next
End Sub
I need to know where I am going wrong...
Thanks