Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.77/22: Рейтинг темы: голосов - 22, средняя оценка - 4.77
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14

Создание макроса

28.11.2019, 08:26. Показов 4849. Ответов 38

Студворк — интернет-сервис помощи студентам
Добрый день!

Нужно создать такой макрос:
- есть 3 файла эксель из одной программы (одинакового формата, разное только наполнение) и 1 файл эксел из другой программы.
- Нужно как-то сделать, чтоб определенные столбцы и строки из этих таблиц (выделены желтым цветом) загрузились в один файл и произошло сравнение данных из этих двух программ на наличие расхождений (т.е. чтоб было видно, каких пациентов из первой программы (файлы Книга, Книга1, Книга2) нет во второй (файл Барс) и наоборот (каких пациентов из второй программы нет в первой).

Файлы прилагаю. К сожалению, с макросами работала очень давно, ничего уже не помню, времени нет обучаться.
Вложения
Тип файла: xlsx Книга.xlsx (13.9 Кб, 12 просмотров)
Тип файла: xlsx Книга1.xlsx (13.3 Кб, 10 просмотров)
Тип файла: xlsx Книга2.xlsx (13.6 Кб, 8 просмотров)
Тип файла: xlsx Барс.xlsx (9.7 Кб, 10 просмотров)
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.11.2019, 08:26
Ответы с готовыми решениями:

Создание макроса
Доброго времени суток! Помогите автоматизировать процесс! Есть две книги : книга1.xlsx и книга2.xlsx Нужен макрос который заполнит...

Создание макроса
Добрый вечер! Такое задание. Создать макрос, изменяющий шрифт выделенного текста на Arial 16, курсив, цвет - зеленый, назначьте для...

Создание макроса new!
Нужно с помощью макроса отсортировать данные так, чтобы ФИО не повторялось, а код (столбец:код) записывался в одну строку разделяясь через...

38
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
30.11.2019, 15:39
Студворк — интернет-сервис помощи студентам
сделал сравнение в обе стороны...

сколько строк бывает обычно в файлах примерно?
Вложения
Тип файла: rar Файл для сращивания.rar (35.0 Кб, 4 просмотров)
1
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14
30.11.2019, 16:25  [ТС]
Да, нужно в обе стороны сравнивать... Можно еще сравнение сделать во втором столбце и тех, которых нет в Барсе, выделить допустим синим цветом.

Добавлено через 2 минуты
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
сколько строк бывает обычно в файлах примерно?
Много, около 4000

Добавлено через 6 минут
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
сделал сравнение в обе стороны...
Все, теперь то, что надо!!!! Спасибо огромное, добрый человек!!!!
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
30.11.2019, 16:38
NATALYAPer, 4000 строк без словарей будет обрабатываться, около минуты... Но со словарями я не работал, так что или кто-то другой Вам переделает скрипт, или миритесь с таким временем
1
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14
30.11.2019, 16:43  [ТС]
Ничего страшного, меня и так устроит! Еще раз большое спасибо!!!
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
03.12.2019, 13:47
Если долго будет проверяться, сделал как вы просили по позициям.....
Вложения
Тип файла: rar Файл для сращивания.rar (31.7 Кб, 4 просмотров)
1
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14
03.12.2019, 15:50  [ТС]
Хорошо, спасибо большое!!! Завтра проверю на работе...) Мне в принципе без разницы, как будет идти сравнение, цветом выделено или позиция указана. Сейчас проверяет около минуты, ну это в любом случае лучше, чем я раньше вручную все это копировала из всех файлов в один...)) А еще тогда вопрос можно? Если книг Барс будет не одна, а допустим три, их можно будет как-то подгрузить или опять переделывать макрос надо?

Добавлено через 1 минуту
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
Если долго будет проверяться, сделал как вы просили по позициям...
Хорошо, спасибо большое!!! Завтра проверю на работе...) Мне в принципе без разницы, как будет идти сравнение, цветом выделено или позиция указана. Сейчас проверяет около минуты, ну это в любом случае лучше, чем я раньше вручную все это копировала из всех файлов в один...)) А еще тогда вопрос можно? Если книг Барс будет не одна, а допустим три, их можно будет как-то подгрузить или опять переделывать макрос надо?
0
6998 / 2896 / 555
Регистрация: 19.10.2012
Сообщений: 8,804
03.12.2019, 15:53
Цитата Сообщение от NATALYAPer Посмотреть сообщение
Мне в принципе без разницы, как будет идти сравнение, цветом выделено или позиция указана
- указать позицию например 50000 ячеек можно за долю секунды (например вывести куда-нибудь список), а вот их покрасить да ещё по одной... нужно замерять, я думаю секунд 5 будет.
1
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
03.12.2019, 16:36
NATALYAPer, Переделывать, но не долго.
1
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
03.12.2019, 21:32
для нескольких барсов
Вложения
Тип файла: rar Файл для сращивания.rar (39.2 Кб, 2 просмотров)
1
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14
04.12.2019, 11:32  [ТС]
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
Если долго будет проверяться, сделал как вы просили по позициям.....
Что-то быстрее не стало...) 3640 записей сравнивалось 15 минут 18 секунд! Может у меня с компом что-то, конечно...
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
для нескольких барсов
В этом файле проверка шла 3 минуты.
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
04.12.2019, 13:44
NATALYAPer, в обоих колонках по 3640 строк?

Добавлено через 56 минут
Цитата Сообщение от NATALYAPer Посмотреть сообщение
Что-то быстрее не стало...) 3640 записей сравнивалось 15 минут 18 секунд! Может у меня с компом что-то, конечно...
Надо будет дома посмотреть, потому, что писал на работе, а работаю я совсем не программистом, мог что-то с кодом по запарке "накосячить", вставить все значения должно быть быстро....
1
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14
04.12.2019, 15:47  [ТС]
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
NATALYAPer, в обоих колонках по 3640 строк?
Нет, кол-во разное было, в Барсе было меньше человек, не помню сколько, тысячи две, а в трех остальных файлах 3640. Я просто на скорую руку проверяла, выгрузила из Барса немного человек. А это имеет значение, разница в кол-ве в двух сравниваемых колонках? В идеале они должны быть равны, но для того и макрос нужен чтоб найти лишних или отсутствующих пациентов.
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
04.12.2019, 16:08
NATALYAPer, Это влияет только на скорость проверки.
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
04.12.2019, 17:28
NATALYAPer, НУ да домой пришел, посмотрел, фигню написал, новый фал в приложении, с формулами, создание занимает секунда может быть 2 с ячейками 4000 шт.
Вложения
Тип файла: rar Файл для сращивания.rar (40.1 Кб, 0 просмотров)
0
0 / 0 / 0
Регистрация: 03.12.2019
Сообщений: 4
04.12.2019, 17:52
Доброго времени суток. Подскажите. Можно ли осуществить сохранение вложения, но чтобы имя вложение, которое сохранянтся брало название темы письма в аутлуке? Макрос сохранения в папку то есть, а вот как сохранить по названию темы.
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
04.12.2019, 18:13
Evsek777, Вы макросом создаете письмо, или извлекаете?
0
0 / 0 / 0
Регистрация: 03.12.2019
Сообщений: 4
04.12.2019, 18:17
Макрос сохраняет вложение из входящего письма в папку. Дата + имя вложения. Дату убрали. Остается имя вложения. Не можем дьбавить имя темы из входящего письма в название сохраненного вложения.
0
23 / 18 / 4
Регистрация: 29.05.2016
Сообщений: 82
04.12.2019, 19:27
Evsek777,

sSubject - тема письма,

вот пример создания письма, подставляйте с учетом вашего макроса

письма

NATALYAPer, Скрестил все вариации кодов, и цвет и позиции, скрипт на 7000 строках, у меня занял времени секунд 5...
Вложения
Тип файла: rar Файл для сращивания.rar (42.2 Кб, 7 просмотров)
1
0 / 0 / 0
Регистрация: 28.11.2019
Сообщений: 14
05.12.2019, 05:25  [ТС]
Цитата Сообщение от nyqpblcTuk Посмотреть сообщение
NATALYAPer, Скрестил все вариации кодов, и цвет и позиции, скрипт на 7000 строках, у меня занял времени секунд 5...
Все, спасибо большое!!! Теперь все очень быстро, пару секунд!!! Всего Вам хорошего и доброго!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
05.12.2019, 05:25

Создание макроса
Помогите. Нужно чтобы при нажатии кнопки "Узнать результат" он переходил на страницу с результатами и заполнял соответствующие ячейки из...

Создание макроса
Нужен макрос, который будет из определенной папки переименовывать файл excel удалением сначала 16 символов до ключевого слова, а потом 5...

Создание макроса
Доброго времени суток господа. Помогите решить проблему. Есть информация в текстовом виде такого рода: Таких строк в в файле может...

Создание макроса
Здравствуйте! Помогите пожалуйста. Создаю макрос , а при выполнении макроса выдает: запрашиваемый номер семейства не существует. Макрос...

Создание макроса на кнопку
Пожалуйста мне нужен код макроса который: При нажатии на кнопку заполнял формулами ячейки(ячейки которые покрашены одним из цветов...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
39
Ответ Создать тему
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru