Перепрыгнеть в содержание


- - - - -

Нужно написать макрос для Excel 2007


8 ответов в эту тему

#1 OFFLINE   Снежок

    Специалист


  • Администратор
  • 2521 сообщения
598
  • МестоположениеРоссия Москва

Добавлено 13 April 2012 - 09:41

Добрый день,господа :) Нужно написать макрос за "Огромное спасибо" или небольшое вознаграждение :) Суть макроса на скрине,описание ниже.

Прикрепленный файл  макрос_cr.jpg   48.89K   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).

Расписать постарался максимально подробно,но если что-то непонятно-спрашивайте.
Ну что,господа форумчане,возьмется кто-нибудь помочь? :)

#2 OFFLINE   triggers

    Триггер Мастер


  • Участник II
  • ПипПипПипПип
  • 989 сообщения
184

Добавлено 13 April 2012 - 12:24

Лови. Макросы не понадобились ;)

Attached File(s)

  • Прикрепленный файл  Book1.zip   4.46K   21 Количество загрузок

Отредактировано triggers, 13 April 2012 - 12:25.


#3 OFFLINE   Снежок

    Специалист


  • Администратор
  • 2521 сообщения
598
  • МестоположениеРоссия Москва

Добавлено 13 April 2012 - 12:54

Сообщенияtriggers, on 13 April 2012 - 12:24, сказал:

Лови. Макросы не понадобились ;)
А как мне этим пользоваться?)

#4 OFFLINE   triggers

    Триггер Мастер


  • Участник II
  • ПипПипПипПип
  • 989 сообщения
184

Добавлено 13 April 2012 - 13:09

Там одна формула.
Скопировать куда надо.

#5 OFFLINE   Снежок

    Специалист


  • Администратор
  • 2521 сообщения
598
  • МестоположениеРоссия Москва

Добавлено 13 April 2012 - 13:16

Сообщенияtriggers, on 13 April 2012 - 13:09, сказал:

Там одна формула.
Скопировать куда надо.
Спасибо конечно,но это по-моему не то что мне надо) Хотя я в этом не разбираюсь и могу ошибаться. У меня около 80 пар столбцов,которые располагаются не так как на скрине,а совсем в других столбцах.

#6 OFFLINE   triggers

    Триггер Мастер


  • Участник II
  • ПипПипПипПип
  • 989 сообщения
184

Добавлено 13 April 2012 - 13:18

Ну вот и скопируй во все ячейки справа от введеных значений формулу. Во все 80 столбцов.
В первой строке всех столбцов есессно 10.

#7 OFFLINE   Снежок

    Специалист


  • Администратор
  • 2521 сообщения
598
  • МестоположениеРоссия Москва

Добавлено 13 April 2012 - 13:38

Сообщенияtriggers, on 13 April 2012 - 13:18, сказал:

Ну вот и скопируй во все ячейки справа от введеных значений формулу. Во все 80 столбцов.
В первой строке всех столбцов есессно 10.
Спасибо,разобрался)))

Отредактировано Снежок, 13 April 2012 - 13:40.


#8 OFFLINE   triggers

    Триггер Мастер


  • Участник II
  • ПипПипПипПип
  • 989 сообщения
184

Добавлено 13 April 2012 - 13:40

Блин, ты просил МАКРОС написать, я думал ты шаришь. С макросами еще сложнее ;)
Скопируй ячейку, в которой не 10, куда надо и размножь.

#9 OFFLINE   Снежок

    Специалист


  • Администратор
  • 2521 сообщения
598
  • МестоположениеРоссия Москва

Добавлено 13 April 2012 - 14:03

Сообщенияtriggers, on 13 April 2012 - 13:40, сказал:

Блин, ты просил МАКРОС написать, я думал ты шаришь. С макросами еще сложнее ;)
Скопируй ячейку, в которой не 10, куда надо и размножь.
Ну хз,для меня проще с макросами) Кнопку нажал и все готово :)