Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Всем, доброе утро.
Подскажите, пожалуйста, возможно ли это реализовать через макрос?
Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Файлы забыл вложить  :idea:  
Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Уважаемые эксперты,
Помогите, пожалуйста, начинающему специалисту в написании кода. У меня стоит следующая задача:
  1. Автоматически создавать файл (Название итоговый файл + месяц) с таблицей по отгрузкам на основании двух источников: заказы и слоты. Делать 1 раз в месяц;
  2. Из "исходника 1" определять тип отгрузки и под него создавать свой лист. Также, по результату отбора для создания листов нужно добавить значения в новую книгу и соответствующие листы следующие значения: Контрагент, Прибытие по, Номер
    Например,
    Значение = В ЦЕМ НВЛ АВТО и на основании части текста "НВЛ" создать лист "Навал самовывоз";
    Значение = U502 СС ТАРА АВТО и на основании части текста "ТАРА" создать лист "Тара самовывоз";
    Значение = Щ ЖБИ АВТО и на основании части текста "ЖБИ" создать лист "ЖБИ самовывоз";
    К сожалению, эти значения не фиксированы и бывает вариация (Например, НВЛ или НАВАЛ; ТАР или ТАРА), которую надо учесть. Пока решение - это добавление столбца в исходнике и внесение единого значения для всех вариаций. Добавление столбца будет оператор вручную;
  3. В файле "Итоговая таблица" необходимо добавить строку и окрасить её в жёлтый цвет со значение контрагента в 3 столбцах (Контрагент, Прибытие по, Номер) у каждого контрагента и на каждом листе;
  4. Из "исходника 2" необходимо подтянуть значения слотов по каждому контрагенту и локации. Детально: нужно взять часть текста или как временное решение (будет делаться вручную) значение из локации из "источника 1" (Значение = В ЦЕМ НВЛ АВТО => часть текста "В" или значение ВОЛ в столбце "Локация для слотов") + в найденной строке значение контрагента из "источника 1" и на основании этих 2 значений найти в "источнике 2" нужный лист и контрагента. Затем, скопировать значения из столбцов Слот 1, Слот 2, Слот 3, Слот 4, Слот 5 и Слот 6 значения и вставить их "Итоговый файл" в строки окрашены жёлтым цветом;
  5. Предусмотреть ежедневное обновление данных в "Итоговом файле". По запросу, коллеги будут добавлять новые строки в "Итоговый файл" из ежедневных выгрузок (исходник 1). Следовательно, необходимо сделать кнопку с макросом для добавления жёлтой строки и поиском значений слотов для контрагентов по локациям (пункт 3 и 4) или автоматизировать процесс с источниками;
К сожалению, моих знаний не хватает на такую сложную задачу. Я пытаюсь сам написать этот код в файле "исходник 1", но столкнулся с проблемой поиска значения из пункта 2.

Буду очень благодарен, если поясните каким образом написали код, т.к. для это будет очень ценная информация!
Если нужно что-то пояснить, готов обсудить это в телеге.
Заранее спасибо за помощь, советы и уделённое время!!!
[ Закрыто] Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Вопрос закрыт, т.к. переведён в форум: Работа.
[ Закрыто] Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Цитата
написал:
Я не работаю в платной ветке, поэтому не могу Вас соорентировать относительно цен, к тому же я не могу даже предположить сумму с которой у Вас начинается умерено, и соответственно дорого. Но я думаю, для себя Вы уже решили сколько это может стоить, вот и начните с этой суммы, а там будите договариваться. Только учтите, что цена будет зависеть от квалификации специалиста, скорости выполнения заказа ну и конечно от качества выполнения
Спасибо большое вам за совет по выбору ветки и ваш ответ по цене.
Соглашусь с вами, о том что вопрос очень не однозначный, но просил вас ответить с вашей точки зрения. Но это уже не важно.
В любом случае, спасибо большое вам за советы и уделённое время.
[ Закрыто] Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Цитата
написал:
это сделать не тяжело, но в Правилах форума сказано:
Согласен. Я описал своё задание, чтобы было понятно, какие вводные запроса упали мне.
Также, я внизу прошу совета и помощи, с точки зрения, как правильно самостоятельно написать код, чтобы он не был тяжёлым для выполнения.
[ Закрыто] Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Msi2102, спасибо большое за ваш ответ. Надо подумать.
Просто словами, на вскидку, как это задание можно оценить по тратам: дешево, умеренно или дорого? На ваш взгляд?
[ Закрыто] Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Извините, забыл написать, если автоматизацию такого характера сделать тяжело, тогда может поможете сделать только пункт 3 и 4 ?
[ Закрыто] Как найти ячейку по части текста и на основании результата поиска скопировать строку в новую книгу и определённый лист?, Необходимо по части текса найти ячейку и скопировать несколько значений в новую книгу и определённый лист (по части текста)
 
Уважаемые эксперты,
Помогите, пожалуйста, начинающему специалисту в написании кода. У меня стоит следующая задача:
  1. Автоматически создавать файл (Название итоговый файл + месяц) с таблицей по отгрузкам на основании двух источников: заказы и слоты. Делать 1 раз в месяц;
  2. Из "исходника 1" определять тип отгрузки и под него создавать свой лист. Также, по результату отбора для создания листов нужно добавить значения в новую книгу и соответствующие листы следующие значения: Контрагент, Прибытие по, Номер
    Например,
    Значение = В ЦЕМ НВЛ АВТО и на основании части текста "НВЛ" создать лист "Навал самовывоз";
    Значение = U502 СС ТАРА АВТО и на основании части текста "ТАРА" создать лист "Тара самовывоз";
    Значение = Щ ЖБИ АВТО и на основании части текста "ЖБИ" создать лист "ЖБИ самовывоз";
    К сожалению, эти значения не фиксированы и бывает вариация (Например, НВЛ или НАВАЛ; ТАР или ТАРА), которую надо учесть. Пока решение - это добавление столбца в исходнике и внесение единого значения для всех вариаций. Добавление столбца будет оператор вручную;
  3. В файле "Итоговая таблица" необходимо добавить строку и окрасить её в жёлтый цвет со значение контрагента в 3 столбцах (Контрагент, Прибытие по, Номер) у каждого контрагента и на каждом листе;
  4. Из "исходника 2" необходимо подтянуть значения слотов по каждому контрагенту и локации. Детально: нужно взять часть текста или как временное решение (будет делаться вручную) значение из локации из "источника 1" (Значение = В ЦЕМ НВЛ АВТО => часть текста "В" или значение ВОЛ в столбце "Локация для слотов") + в найденной строке значение контрагента из "источника 1" и на основании этих 2 значений найти в "источнике 2" нужный лист и контрагента. Затем, скопировать значения из столбцов Слот 1, Слот 2, Слот 3, Слот 4, Слот 5 и Слот 6 значения и вставить их "Итоговый файл" в строки окрашены жёлтым цветом;
  5. Предусмотреть ежедневное обновление данных в "Итоговом файле". По запросу, коллеги будут добавлять новые строки в "Итоговый файл" из ежедневных выгрузок (исходник 1). Следовательно, необходимо сделать кнопку с макросом для добавления жёлтой строки и поиском значений слотов для контрагентов по локациям (пункт 3 и 4) или автоматизировать процесс с источниками;
К сожалению, моих знаний не хватает на такую сложную задачу. Я пытаюсь сам написать этот код в файле "исходник 1", но столкнулся с проблемой поиска значения из пункта 2.

Пожалуйста, помогите в следующем:
  • Разобраться в чём ошибка при поиске?
  • Как сократить текущий код?
  • Как правильно сформировать последовательность работы макроса?
  • Как и чем пользоваться при решении последующих пунктов?
Если нужно что-то пояснить, готов обсудить это в телеге.

Заранее спасибо за помощь, советы и уделённое время!!!
Макрос по поиску повторяющих значений и вывода их в таблицу, Исправить Макрос по поиску повторяющих значений и вывода их в таблицу
 
Цитата
написал:
Set RgAll = shtThis.Range("A2:E" & shtThis.Cells(Rows.Count, "E").End(xlUp).Row)
Евгений, огромное спасибо за ещё один код.
Я проверил его работу и хотел уточнить, а почему поиск работает только по значениям, которые находятся в столбце D "Код подразделения".
Возможно, я ошибаюсь, но мы закладываем диапазон для поиска с A2 до последней ячейки в столбце "E".
При варианте вводе слова "Отгрузка" макрос должен найти 50 значений и скопировать 50 строк в rngNew, или я ошибаюсь?
Заранее спасибо за ваш ответ.
Макрос по поиску повторяющих значений и вывода их в таблицу, Исправить Макрос по поиску повторяющих значений и вывода их в таблицу
 
Цитата
написал:
For i = 2 To UBound(Ar1): For j = 1 To UBound(Ar1, 2)
Евгений, спасибо большое за помощь с написанием кода и уделённое время.
К сожалению, код отрабатывает только на значении S8001. А при вводе слова "Казань" или части кода "SC101" всё равно копируются значения для "S8001".
Также, если вам не трудно можно вас попросить написать комментарии к процессам, операторам и переменным, чтобы я смог учиться гляда на ваш код.
Заранее спасибо!
Макрос по поиску повторяющих значений и вывода их в таблицу, Исправить Макрос по поиску повторяющих значений и вывода их в таблицу
 
Доброе утро, evgeniygeo.
К сожалению, у меня нет понимания по цене.
А на обычный форум у меня получилось сделать такое сообщение.
Макрос по поиску повторяющих значений и вывода их в таблицу, Исправить Макрос по поиску повторяющих значений и вывода их в таблицу
 
Добрый день, уважаемые эксперты.
Я только начал изучать VBA и попытался написать код по поиску повторяющих значений по части текста и вывода их в отдельную таблицу в виде построчных записей. К сожалению, что было многовероятно, у меня это не получилось.

Например: вводим в диалоговое окно значение S8001 и нажимаем "ОК".
Результат: в другой таблице появились 10 строк со значением "S8001", которое находится в любой части таблицы источника, т.е. поиск производился по всем столбцам и строкам.

У меня проблема в том, что макрос отрабатывает очень долго и в конце с результатом (неправильным) выдаёт ошибку. Также, при нажатии на отмену в диалоговом окне (ввода значения) макрос и Excel зависает (красится в серый и статус "Не отвечает".
Неправильный результат заключается в том, что правильное количество строк располагается неправильно в новой таблице (сдвигается на определённое количество строк влево.

Помогите, пожалуйста, разобраться где ошибка или подскажите как упростить мой код, чтобы я мог получить необходимый результат.
Заранее благодарен.
Страницы: 1
Наверх