Определить по значимости

Программирование на Visual Basic for Applications
ruvster
Новичок
Новичок
 
Сообщения: 39
Зарегистрирован: 18.08.2005 (Чт) 19:32

Определить по значимости

Сообщение ruvster » 22.09.2005 (Чт) 21:34

В столбце, например, "А" есть значения отсортированные по убыванию.
т.е
10
9
5
3
и т.д.
Необходимо с столбце "В" напротив этих значений определить их по значимости и вывести результат
т.е
10 имеет значимость 1, поэтому напротив в столбце "В" ставим 1
9 2
5 3
3 4
т т.д.
Сдесь вроде бы пронумеровать по порядку и все но....
в столбце "А" могут быть одинаковые значения, например:

10
9
5
5
3
1
1
Тогда необходимо чтобы одинаковые значения имели одинаковый статус т.е.
10 1
9 2
5 3
5 3
3 4
1 5
1 5
Вот с этим мне что то не справиться.
Спасибо

K.Sergey
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 115
Зарегистрирован: 11.10.2004 (Пн) 0:42
Откуда: Санкт-Петербург

Сообщение K.Sergey » 22.09.2005 (Чт) 23:55

В столбце А находятся значения по убыванию.
В ячейке В1 ставишь 1.
В ячейке В2 вводишь формулу: =ЕСЛИ(A2=A1;B1;B1+1)
Во все последующие ячейки протягиваешь формулу из В2.
Life is what happens to us when we are planning to do something else...

K.Sergey
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 115
Зарегистрирован: 11.10.2004 (Пн) 0:42
Откуда: Санкт-Петербург

Сообщение K.Sergey » 23.09.2005 (Пт) 0:11

Или тебе в VBA надо?
В любом случае принцип такой же.
Life is what happens to us when we are planning to do something else...

sergeyvg
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 16.08.2005 (Вт) 9:27

Сообщение sergeyvg » 23.09.2005 (Пт) 9:36

Если список в A1:A13, то в B1 формулу
=РАНГ(A1;$A$1:$A$13;0)
и копируешь ее до B13


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 31

    TopList  
cron