Добрый день. Работал с Анатолий Степанов, результат ему отправлен, но не оплатил работу. Я ждал больше двух месяцев. Прошу внести в чёрный список. Его почта Stepanov.post@yandex.ru. Могу также другие контакты выложить.
Здравствуйте. Самое простое решение через макрос. Т.е. нажимаете кнопку, выбираете все файлы, макрос их отрабатывает и копирует в новую книгу. И так каждый раз. Ручками вообще не работаете. Это так вкратце.
Что значит не работает??? На 3 шаге у вас конечный список - хоть копируйте, хоть размножайте. Если для вас три раза вышкой щелкнуть - это подвиг, то пишите макрос.
2. У вас получится список с повторяющимися значениями. Далее выделяете столбец J, переходите в "Данные" - удалить дубликаты - сортировать в пределах указанного диапазона - Удалить дубликаты - Ок 3. На выходе имеем список уникальных значений.
Здравствуйте. Покажу пример на строке 5 (младшая школа - Охотникова Людмила): 1. Выделяете диапазон F5-R5. 2. Далее: Главная - Условное форматирование - Создать правило - Использовать формулу для определения форматируемых ячеек. 3. Создаете первое правило - формат (зеленая заливка), формула такая:
Код
=F$5 >F$6
4. Создаете второе правило - формат (красная заливка), формула такая:
Почитайте правила, например: 2.7. Если вам нужен не совет по самостоятельному решению задачи, а чтобы все сделали за вас - добро пожаловать в ветку Работа. Там, скорее всего, найдутся специалисты, которые разберутся с вашей проблемой быстро, качественно и за разумную плату.
Добрый день. Вы за 7 лет на форуме не научились пользоваться экселем и писать макросы??? Все ваши 232 сообщения о помощи сделать с 0. Хорошо жить, когда тебе всегда помогают.
Здравствуйте. Запихайте столбец А в массив (массив = столбец А). Массивы быстрее отрабатываются, после манипуляций сделайте обратное действие - столбец А = массив.
Dim MyCell As Range
i = ThisWorkbook.Worksheets("Лист1").Range("B1").CurrentRegion.Rows.Count
ThisWorkbook.Worksheets("Лист1").Range("B9:B" & i).Activate
For Each MyCell In Selection
If IsNumeric(MyCell) Then MyCell = MyCell * 1
Next