Change numbering of data

  • Thread starter Thread starter ccholai
  • Start date Start date
C

ccholai

Hi,

I have a set of numbers - say a fixed block that starts

1
3
15
16
18
20
24
etc

and have palms that have their fronds numbered
Palm 1 Palm2
2 5
4 17
15 20
17 22
18 30
20 40


what i am trying to do is following this set of rules below:

for the second list - whatever the first number is - has to be changed
to the fixed list.

ie. first number in the second list for that certain palm will equal
first number in the fixed list.


so in the end :

Palm 1 Palm2
2 -1 5 - 1
4 -3 17 - 3
15 -16 20 -16
17 -18 22 - 18
18 - 20 30 - 20
20 - 24 40 - 24

it looks easy.... enough

so min(palm1) = min(fixed)
next palm1
next fixed

??
 
so for each palm, the list of numbers should be the same as the fixed list?

so if the fixed list is A1:A100

if palm2 first item is say G5

WITH Range("A1:A100") ' the fixed list
Range("G5").Resize(.Rows.Count).Value = .Value
END WITH

you could do this for a range of palms. so if all the palm tables start in
say row 15, in columns G-P

dim cell as Range
WITH Range("A1:A100") ' the fixed list
for each cell in Range("G15:P15").Cells
cell.Resize(.Rows.Count).Value = .Value
next
END WITH
 
Back
Top