Добрый день,господа Нужно написать макрос за "Огромное спасибо" или небольшое вознаграждение Суть макроса на скрине,описание ниже.
макрос_cr.jpg 48.89kb
12
Итак,у нас 6 пар столбцов (для удобства выделены цветом) Изначально у нас заполнены только левые колонки,а вот правые и должен заполнить макрос разными числами,в зависимости от величины числа в левой. То есть макрос должен сам "понимать" число в левой колонке и вставлять число в правую. Если у нас 10 строк(как в примере),то числа проставляются от 10 до 1 (диапазон). Если 17 строк,допустим,то от 17 до 1. Максимум строк может быть 26.На скрине 6 примеров,как надо заполнять правые столбцы в зависимости от содержания левого:
1. В левом столбце числа не повторяются,правый столбец заполняется от 10 до 1 в порядке убывания чисел в левом.
2. В левом столбце 1 раз повторяется число (6),поэтому и в правой колонке ставится 2 одинаковых числа,а диапазон чисел изменяется с 10 до 1 на с 10 до 2.
3. В левом столбце 2 раза повторяются разные числа (2 раза 12 и 3 раза 6),поэтому и в правой колонке ставится 2 раза по 2 и 3 одинаковых числа,диапазон чисел изменяется с 10 до 1 на с 10 до 4.
4. В левом столбце всего 2 разных числа, это 9 и 9 раз повторяется значение 2,поэтому и в правой колонке ставится всего 2 разных числа,диапазон чисел изменяется с 10 до 1 на с 10 до 9.
5. В левом столбце все числа одинаковые,в правом выставляется везде одинаковое число,диапазон меняется с 10 до 1 на с 10 до 10.
6. Числа в правом столбце проставляются наоборот, от минимального к максимальному. При повторах те же действия,как и выше.
Доп. информация: Повторов может быть и больше,например по 3 повтора в столбце по 3 числа. Выделение цветом столбцов не требуется. Всего таких пар столбцов около 80,из них почти все должны иметь сортировку от максимума к минимуму (как в примерах 1-5) и несколько от минимума к максимуму (как в примере 6).
Расписать постарался максимально подробно,но если что-то непонятно-спрашивайте.
Ну что,господа форумчане,возьмется кто-нибудь помочь?
1
Нужно написать макрос для Excel 2007
Снежок, Apr 13 2012 09:41
#1
13 April 2012 - 09:41
#2
13 April 2012 - 12:24
Лови. Макросы не понадобились
#4
13 April 2012 - 13:09
Там одна формула.
Скопировать куда надо.
Скопировать куда надо.
#6
13 April 2012 - 13:18
Ну вот и скопируй во все ячейки справа от введеных значений формулу. Во все 80 столбцов.
В первой строке всех столбцов есессно 10.
В первой строке всех столбцов есессно 10.
#8
13 April 2012 - 13:40
Блин, ты просил МАКРОС написать, я думал ты шаришь. С макросами еще сложнее
Скопируй ячейку, в которой не 10, куда надо и размножь.
Скопируй ячейку, в которой не 10, куда надо и размножь.