Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Please explain why following code doesn't work....
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 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Please explain why following code doesn't work....
And change as well
Activecell.offset(1+i,0).value=store(i) else you'd be writing the same cell all the time. -----Original Message----- Change For i = 3 To 0 to For i = 3 To 0 Step -1 -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "FMNT80" wrote in message . com... 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 . |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Please explain why following code doesn't work....
Current Version: (Working)
Sub Panel_Flip() Dim store(3) As Double For i = 3 To 0 Step -1 void = MsgBox(i, vbOKOnly, "i:=") store(i) = Val(ActiveCell.Offset(0, 1 + i).Value) void = MsgBox(store(i), vbOKOnly, "Store(" + Str$(i) + ")") Next For i = 0 To 3 void = MsgBox(store(i), vbOKOnly, "Store(" + Str$(i) + ")") ActiveCell.Offset(0, 4 - i).Range("A1").Value = store(i) Next End Sub Now to extend it to a selection of any length (more complicated :-)). I'm assuming Current Region plays a role. Ideally it should be possible to have a routine tat will flip even if your not at the start of the sequence but that would need some way of determing the start and end columsn of a selected region.. FMNT80 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Maco code doesn't work. Why? | Excel Discussion (Misc queries) | |||
Why does this code not work? | Excel Discussion (Misc queries) | |||
code does not work anymore | Excel Discussion (Misc queries) | |||
Event code won't work | Excel Discussion (Misc queries) | |||
Why this code is not work? | Excel Worksheet Functions |