Do until row is no more than 6 times row below

[bmaule]

Hi all,

I have 14 columns of number each having 20 rows. I would like to "normalize" the data so that no row has a value that is more than 6 times the row below.
I have use "do until" and "do while" macros but cannot get them to do what I want which is to keep changing the values until the condition is satisfied.

For example: if row1 =120; row2=90; row3=10; row4=1. The result should should be 120, 36, 6, 1. In others words the macro should change the same value several times until the condition is satisfied.

 

[bmaule]

Hi PCL no need to be sorry and I am grateful for your efforts to help me. So what was happening is that your macro was generating and error at the condition statement ("IF). However by inserting "on error resume next" it now runs without a hitch. The problem now is that it seems to be only "looping" once and once it has made a change it does not check to see how that change has affected the other rows and if it has then update the change previously made. Your macro results in 38.88, 6.48; 1.08; 0.18. So while it has made changes, it should look at those changes and make additional changes consistent with the conditions set. So after the first set of changes it would then change 1.08 to 0.94 and then change the others.
Thanks.

 

[PCL]

I have no idea why occued an error ...what is the data when it happens???

it seems to be only "looping" once and once it has made a change

NO , NO, NO the code starts from the bottom of the column and do the test with the cell above, then modify the cell above if needed then redo the test until row FR
Have you run the code with next data in the cells as mentioned: Only one column : A

A5 = 5242.84
A6 = 2.52
A7 =0.04
A8= 0.018

and of course put the code in a module ...!

 

[PCL]

I forgot to ask you : There is only one macro, the one sent ... no other one in the tab' code for example ??

 

[bmaule]

Sorry for the late response. I will keep trying.
Thanks