[2021] Как заполнить Word шаблон из таблицы Excel Часть 1

Рет қаралды 44,356

4 жыл бұрын

Всем привет, в этом видео я наглядно покажу, как заполнить Word шаблон из таблицы Excel, покодим немного на VBA, в результате Вы сможете создавать ворд документы по шаблону на основе данных из Excel таблиц. Видео будет иметь продолжение, во второй части • [2021] Как заполнить W... модифицируем шаблон так, что бы текст находился в надписях(текстовые поля). Не пропустите!!!
Исходный код из этого видео тут - maxfad.ru/video-uroki/uroki-e...
• [2021] Как заполнить W...
📌Подпишись 👉 goo.gl/MZB7lu
📌Ставь 👍 и 🔔
📌Заходи 👉 maxfad.ru
Поддержать канал донатом:
ЮМани - yoomoney.ru/to/410016390585161
QIWI - qiwi.com/n/MAXFADRU
Поддержите канал лайком и репостом, ставьте класс, чтобы ролики выходили чаще, поделитесь этим видео со своими друзьями и подписывайтесь на канал !!! :-)

Пікірлер: 122

@kompiuterapiia 3 жыл бұрын

@user-cy3jz5nc7i 3 жыл бұрын

Добрый день. Есть ли возможность сделать то же самое, но без ворда? В экселе имеется бланк отчета, нужно сформировать несколько листов

@kompiuterapiia 3 жыл бұрын

В 4 части как раз показывал на реальном примере kzfaq.info/get/bejne/rK2ag8WTx5Owgn0.html

@baxtiyor_rieltor 2 жыл бұрын

замена идет только на один текст (параметр) Как сделать что бы во всех текстах было изменение wdDoc.Range.Find.Execute FindText:="&rekID", ReplaceWith:=rekID$ (ReplaceWith нужно All)

@romanzhivotovskij1016 2 жыл бұрын

Офигенное видео! Все очень четко и понятно, при этом без воды. Спасибо!

@valeriymironenko6332 3 жыл бұрын

Супер, это то, что я искал.

@user-ow9oh2up1z Жыл бұрын

Спасибо большое. Выручили. Очень пригодилось!

@231086olga 3 жыл бұрын

Спасибо большое, у меня получилось

@user-mw3ib9rr8f 2 жыл бұрын

Вот это да, как всё просто, спасибо!) А то я по незнанию вообще написал самый колхозный код) Записал в ворде макрос по поиску и замене слова, типа нужной переменной, и за место цикла я просто копировал код на каждый документ со своим текстом, чтобы он выполнялся последовательно, сохраняя файл и отменяя все действия каждый раз, чтобы вновь осуществлять поиск с заменой для следующего файла) В итоге, такая километровая портянка даже не запустилась, хоть и рабочая в более коротком виде)

@yaroslavneilo1820 2 жыл бұрын

Спасибо, крутое видео

@StelsNur Жыл бұрын

Отлично 👍

@andreimihalko4927 3 жыл бұрын

Спасибо=)

@user-se6su2ky5r 3 жыл бұрын

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

@kompiuterapiia 3 жыл бұрын

Благодарю, информации в этом ролике вполне достаточно для создания бланков любого образца, пример с командировочным удостоверением можно трансформировать под любые свои нужды.

@user-ib7es1ed7f 3 жыл бұрын

Очень интересный урок. У меня вопрос. Как сделать так, что бы создавшийся документ ворд, автоматом распечатывался на принтере? Заранее благодарю.

@OGYRCHIK-SEV 3 жыл бұрын

Подскажите, а как сделать вывод результата в один документ? без формирования в отдельные док файлы?

@rohazavr5030 2 жыл бұрын

Здравствуйте! Большое спасибо за такой подробный урок, очень помогло в решение задачи! У меня всё получилось, файлы заполненные появляются, однако почему-то сам Эксель после этого очень долго думает и показывает, что идёт какая-то загрузка ещё минуты две. Подскажите, в чем может быть причина? Сделал 3 строки и 3 столбца, странно, что он так долго думает. Код такой же, как у вас. Спасибо!

@shvedyou Жыл бұрын

А если я в процессе (через некоторое время после сохранения файлов) буду добавлять новые строки (5,6,7 и тд).То файлы с уже сохранеными строками будут сохраняться по новой? Если да, то как сделать, чтобы сохранялись файлы с только добавленными строками.

@user-yo8jr8jb2u 3 жыл бұрын

Прекрасны ролик! Подскажите, пожалуйста, а что нужно добавить, чтобы файлы word создавались в определенную папку?

@kompiuterapiia 3 жыл бұрын

Если не устраивает создание docx файлов в той же папке, где находится файл с данными, путь создания можно указать иным в модуле, в строках создания файла. Если нужно часто менять путь, я создаю новый лист с именем config и в конкретную ячейку его вписываю, а через переменную передаю его в строку создания файла.

@user-ty2nq6li7g 2 жыл бұрын

Справочно.Не используйте Option Explicit при записи подобных функций HomeDir$, он будет не допускать работу подпрограммы, рассматривая их как не объявленные переменные. Спасибо за урок!

@darrtah Жыл бұрын

А возможно макросом из Excel вставлять в определенное место документа Word картинку из папки?

@user-io2lq7md8m 3 жыл бұрын

Возможно ли таким способом вставлять в вордовский документ изображение из ячейки экселя? Например в эксель подгрузить изображения подписи каждого сотрудника и заполнить шаблон в ворд для каждого из них.

@shvedyou Жыл бұрын

Подскажите один момент, у меня в документе несколько одинаковых переменных (к примеру ФИО встречается 5 раз). Сделал шаблон по вашему уроку, но у меня меняются только первые переменные, а остальные идут с кодом &fio. Как мне сделать так чтобы менялись все данные?

@popov-epid 2 жыл бұрын

Спасибо за отличный урок! Подскажите пожалуйста код открытия целевой папки после отработки скрипта.

@kompiuterapiia 2 жыл бұрын

Как вариант можно попробовать так: Shell "Explorer.exe d:\1", vbNormalFocus . откроем диск d и папку 1....

@testerbotov4379 3 жыл бұрын

Спасибо большое, очень полезное и продуктивное видео получилось. Подскажите ,пожалуйста, а знак % обязательно указывать после переменное i?

@kompiuterapiia 3 жыл бұрын

Поскольку переменную i я явно не объявлял как Dim i as Integer, то символом % я указал, что переменная это число. Можно так, можно иначе, мне 7 раз % написать было не сложно..)

@testerbotov4379 3 жыл бұрын

@@kompiuterapiia , спасибо большое. Очень удобно, а то бывало, что надо использовать много переменных, а на их объявление уходит слишком много места в коде)

@user-gk3ey4hc3d 3 жыл бұрын

Доброго дня. Можливо у вас є відео як вже в готовому ворді із вставленою таблицею ексель, зробити її форматом ворд?

@sergey_patara 2 жыл бұрын

Отлично, очень помог код в плане создания word документа и передачи в него данных из excel, у меня вопрос по поводу даты, Run-time error '13': Type mismatch, как это исправить?

@user-ty2nq6li7g 2 жыл бұрын

Используй в строках с копированием и открытием файла знак амперсанда вместо "+"

@user-mw3ib9rr8f 2 жыл бұрын

Здравствуйте, а как мне сделать так, чтобы заменяемый текст применял конечное форматирование не ворда, а именно эксель? Вот у меня в таблице, скажем, текст с жирным шрифтом, а заменяет текст в ворде, который обычный. Соответственно и форматирование применяется конечное, а не как в таблице.

@colovrat 3 жыл бұрын

Спасибо за ролик и код. Подскажите пожалуйста, а почему операторы в файл шаблона переносят значения из excel только один раз? Например я задал оператор &data1 и в Excel задал значение 01.07.2021. По тексту шаблона требуется указать этот оператор несколько раз. При формировании файлов первый раз оператор &data1 отображается как 01.07.2021, а все последующие применения по тексту как &data1. Что нужно сделать, чтобы каждый раз вставлялось значение? Заранее благодарен.

@kompiuterapiia 3 жыл бұрын

Благодарю за комментарий, я уже с подобным вопросом сталкивался, если надо одну и туже информацию несколько раз добавлять, то в коде назначьте переменные типа data1, data2 со значением 01.07.2021 столько раз, сколько нужно. И в шаблоне их разместите, где нужно, скрипт в цикле пробежит по всем значениям и все заменит. Это не баг, это фича))

@antoninaklicenko7651 Жыл бұрын

Спасибо огромное! Но пришлось отлаживать Ваш код. Я новичек, поэтому пришлось повозиться...В вашем коде не объявлены остальные переменные. Вопрос! Как сделать тоже самое, но из "умной таблицы" excel, чтобы создавался отчет по выделенной строке/диапазону строк из этой "умной таблицы"?

@user-ep3xs5uc9g Жыл бұрын

Подскажите пожалуйста, как сделать так, чтобы эти сформированные файлы улетали по почте аутлук на определенные адреса?

@kpk-kamen-na-obi 2 жыл бұрын

Здравствуйте. Отличное видео, все вроде понятно, но работает только в формате doc, а docx не работает. И я бы хотел спросить, как сделать что бы документ сразу сохранялся в формате pdf? А то мне приходится после создания файлов преобразовывать их в pdf. Ещё раз спасибо за урок.

@kompiuterapiia 2 жыл бұрын

Насчёт doc и docx, с какими файлами работаете, в таком формате и происходит сохранение.

@danilvasilev2828 Жыл бұрын

Здравствуйте! Подскажите пожалуйста,почему ворд формирует не больше 7 документов за раз?

@user-kh7et8eu1q 7 ай бұрын

Здравствуйте, а как сделать если нужно заменить данные в сноске?

@user-jg7lt9tj5m 3 жыл бұрын

Подскажите, пожалуйста, можно ли сформировать таким образом всё содержимое в один файл (т. е. чтобы не было разбивки по каждой строке в отдельный файл)?

@kompiuterapiia 3 жыл бұрын

Расскажите подробнее, что за файл должен быть получен, как Вы себе это представляете.

@user-jg7lt9tj5m 3 жыл бұрын

@@kompiuterapiia В Вашем примере для каждой строки из таблицы Excel формируется отдельный файл Word. Можно ли сделать так, чтобы был сформирован один файл Word, а каждая строка была как отдельная страница в нём?

@kompiuterapiia 3 жыл бұрын

Для того, чтобы сделать один word файл с однотипными бланками не нужно использовать VBA, достаточно использовать Рассылку из штатного инструмента редактора. На вкладке лента есть такой пункт, в документе набрали нужный текст, в слиянии подключили Эксель таблицу с данными, указали где какое поле таблицы должно показываться в шаблоне и готово. Хотите печатайте, хотите пересохраняйте, для отправки по эл.почте. Мне нужны были файлы отдельно, поэтому я и формировал из каждой строки Эксель отдельный Ворд файл.

@user-jg7lt9tj5m 3 жыл бұрын

@@kompiuterapiia Огромное спасибо за ответ!

@slovoplus 2 жыл бұрын

Добрый день. Подскажите а вы под заказ сможете написать шаблон из договора с автозаполнением .

@kompiuterapiia 2 жыл бұрын

День добрый, уверен, что посмотрев мои ролики, Вы сами сможете сделать свой шаблон и заполнить его необходимыми данными.

@slovoplus 2 жыл бұрын

@@kompiuterapiia нет так как я хочу у меня неполучится, я хочу чтоб были определенные конкретные поля которые заполняются один раз и из них формировалась база в экселе и чтоб после уже можно было выбирать из базы клиента и формировать договор

@sergeich2007 Жыл бұрын

Доброго дня! Спасибо за видео урок, макрос пишет готово и выгружает файлы. Но есть момент, при открытии выгруженного файла Word "код значения &" не поменялся на текст из ячеек Excel. Где проблема, и как ее исправить!?

@sergeich2007 Жыл бұрын

Нашел ошибку, все работает!!!

@MrAlexMacedon 3 жыл бұрын

Добрый день! Подскажите, пожалуйста, почему код не работает при сохранении документов в формате docx? FileCopy HomeDir$ + "\template.docx", HomeDir$ + "\" + NPP$ + "_" + ID$ + "_" + DataC$ + ".docx" Set wdDoc = wdApp.Documents.Open(HomeDir$ + "\" + NPP$ + "_" + ID$ + "_" + DataC$ + ".docx")

@user-cf4qq5xe1n 2 жыл бұрын

у меня такая же проблема(((

@kpk-kamen-na-obi 2 жыл бұрын

Аналогично! Значит другой код нужен.

@yaroslavivask6600 3 жыл бұрын

Отличное видео. Спасибо. Подскажите, выдает ошибку 52, неправильное имя файла или номер. Подскажите, в чем может быть проблема и как ее решить. Имя файла верное и находится в одной же папке с файлом эксель

@kompiuterapiia 3 жыл бұрын

Вариантов почему так куча, проверьте в диспетчере задач не висит ли лишняя копия word, я с этим часто сталкивался, в описании под видео есть ссылка на архив с файлами из этого видео. Посмотрите, как они запустятся, но я работаю в 2013м офисе, это стоит учитывать, если ваша версия отличается. И всё-таки проверьте имя файла, не содержит ли оно недопустимых символов.

@yaroslavivask6600 3 жыл бұрын

@@kompiuterapiia 2019 офис, да проблема была с наименованием. Все получилось и заработало. Спасибо за ваше видео. Буду и дальше смотреть и открывать для себя новое.

@vladislavzubko8552 3 жыл бұрын

@@yaroslavivask6600 Добрый день. А что именно исправили? У меня 365 офис, и ошибка 52 выскакивает при работе на облачной папке (OneDrive) на локальной папке все работает.

@user-wn9fl1on8i 3 жыл бұрын

Здорово получается, а как в коде макроса задать новую папку для сохранения созданных файлов?

@kompiuterapiia 3 жыл бұрын

Проще всего это изменить путь в строке кода, или добавить новый лист, в одну ячейку вписать имя папки, получить значение в переменную, например pass. Затем в коде прописать так: = "d:\докуметы\отчеты\" & pass , хотя в pass тоже можно вписать какую-нибудь структуру. Лист назвать config и в нем указывать свои настройки.

@kompiuterapiia 3 жыл бұрын

Хотя лично мне кажется удобным хранить все файлы вместе, с одной папке, сформировав отчеты можно сразу все переместить куда надо...)

@The_Kozhin Жыл бұрын

А есть у кого мысли. Если к примеру значение переменной &date пусто (ячейка пустая), то не выводить её в формирование?

@toptrend8337 3 жыл бұрын

Здравствуйте ,у меня таккая проблема, программа работает,документы создаются,но значения не меняются ,подскажите пожалуйста а чем проблема ????спасибо заранее

@baxtiyor_rieltor 2 жыл бұрын

@Vikma 3 жыл бұрын

Только ваше видео помогло, ваш код хорош, но есть вопрос, а если у меня в шаблоне несколько "&Adress" то ваш код заменяет только одну, первую по списку в шаблоне, а как сделать чтоб заменял несколько &Adress? Я не придумал ни чего как добавить еще &Adress2, &Adress3 ? а в коде скопировал и добавил еще пару строк уже с &Adress2, &Adress3. Вопрос как сделать чтоб макрос заменял все &Adress в шаблоне. Простите если не понятно написал, я чайник)

@kompiuterapiia 3 жыл бұрын

Как по мне идея с одноимённым заменяемыми значениями типа &adress2 и тд, вполне работоспособна. Действительно, можно пробежаться в цикле по всем одинаковым значениям, но это немного может замедлить работу макроса, проще присваивать заменяемые одноимённые значения и цифрами для отличия из переменной. Главное в коде располагать их в той же последовательности, что и макете шаблона.

@Vikma 3 жыл бұрын

@@kompiuterapiia спасибо!

@user-gg1ts9tb3r 3 жыл бұрын

Run-time error 53 File not found

@dadmanWhite 3 жыл бұрын

С вами можно проконсультироваться по поводу моего макроса? желательно в личку

@kompiuterapiia 3 жыл бұрын

В группе вк пишите, ссылки в шапке канала.

@user-zo2wn9qn7r 2 жыл бұрын

Если в первом столбце убрать данные, например я захочу сохранить только 3 файл, то при первой проверки условия мы выходим из цикла и заверашаеться работа макроса. Т.е. документ по третей строке не будет создан. Почему-то конструкция Continue Do не прописывается...

@kompiuterapiia 2 жыл бұрын

Оставляем в таблице только те строки, по которым должны быть сформированы бланки.

@user-mw3ib9rr8f 2 жыл бұрын

Как таким способом можно заменить текст в колонтитуле? Его же нужно сначала открыть, осуществить так же поиск с заменой и закрыть. А как мне код нужный написать? И как мне определённые строчки данных в Excel сохранять в отдельный файл не в одну папку со всеми, а по другому пути например?

@kompiuterapiia 2 жыл бұрын

Про колонтитулы есть видео на канале, путь к сохранению файлов меняйте по своему усмотрению.

@kompiuterapiia 2 жыл бұрын

kzfaq.info/get/bejne/d5manNOQmtCZZ30.html

@user-mw3ib9rr8f 2 жыл бұрын

@@kompiuterapiia Здравствуйте, снова возник вопрос по заполнению вордовского документа макросом. Можно ли как-то заменять текст, чтобы конкретно использовалось форматирование, как в ячейке эксель, например, жирный шрифт или размер букв?

@231086olga 3 жыл бұрын

А если у меня информация находится на 2-х листах в Excel, нужно как-то прописывать что информация должна собираться со 2 листа?

@Alex_R.T. 3 жыл бұрын

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

@user-ty2nq6li7g 2 жыл бұрын

сделайте цикл выполнения заполнения для сбора переменных сначала с 1 листа затем со второго

@The_Kozhin Жыл бұрын

Как задать переменные не столбцах а в строках?

@user-os2uv7xd7l 2 жыл бұрын

скажите пожалуйста выдает ошибку Run-time error '52': Bad file name or number. Хотя все сделал как вы?

@kompiuterapiia 2 жыл бұрын

посмотрите вот тут kzfaq.info/get/bejne/bp90ltCZsMitqqc.html с 5м30с все ли модули подключены, а вообще неправильное имя или номер. В описании под видео есть ссылка на исходник и zip архив с файлами, по ним я и делал ролик, все должно работать.

@user-hb8jr6ih6y 2 жыл бұрын

Здравствуйте, выдает ошибку на строке объявления модуля Sub main(). Скачивал ваш код и при запуске выдает туже ошибку. В чем может быть ошибка?

@zibroyd 2 жыл бұрын

Название процедуры не должно совпадать со встроенными в vba названиями методов, функций и т.д. Скорее ваше "main" совпадает. Надо переназвать как-то иначе.

@user-vg2ej5kt2n 2 жыл бұрын

Добрый день, а как бороться со слишком длинным строковым параметром?

@kompiuterapiia 2 жыл бұрын

Смотрите часть 3, как раз тот случай.

@Foxy-ln7cl Жыл бұрын

Здравствуй, не правильно указан путь, как Это можно исправить?

@user-dk4lj5ri8n 3 жыл бұрын

Здравствуйте. У меня почему то только на первом листе документа меняется на нужные значения а дальше остаются &name. Почему так?

@Alex_R.T. 3 жыл бұрын

Представленный код меняет только первую метку. Тут нужно делать циклы или, если есть, команду "заменить все" применять. Ну или, по ленивому, как я и сделал: пишешь команду замены столько раз, сколько тебе нужно ;D Пример: wdDoc.Range.Find.Execute FindText:="&name", ReplaceWith:=name$ wdDoc.Range.Find.Execute FindText:="&name", ReplaceWith:=name$

@Vikma 3 жыл бұрын

@@Alex_R.T. а как команда "заменить все" выглядит, на примере вашего макроса?

@user-oi4rw3pv8b 2 жыл бұрын

Спасибо. Видео очень помогло создать хороший код, но столкнулся с проблемой и на первый взгляд в коде не видно. Код тот же, таблица на 10 строк, переменных 64. Разрешаю 6 - отображает только 3, как в Вашем файле. Ставлю 10, отображает то 7, то 10. Помогите найти причину.

@kompiuterapiia 2 жыл бұрын

Обычно таблица является законченным результатом, сколько строк в ней, столько и выводим на печать. Пример с возможностью выбора, какие строки генерировать, хорошо работает если нужно вывести первые 10 строк, по коду на остальных произойдет остановка. Если очень нужно сформировать не весь список, но не хочется удалять остальное - отсортируйте таблицу по столбцу с отмеченными пунктами, так чтобы они шли подряд в столбце. Сформировали, убрали из столбца порядковый номер, заполнили остальные, отсортировали и по новой.

@user-oi4rw3pv8b 2 жыл бұрын

@@kompiuterapiia Нашёл ошибку. Оказалось, что макрос теряет значение (ничего не отображает), если искомая ячейка со значением в Excel "сверх малого размера по ширине (у меня она была 0,67, а значение было большое).

@user-oi4rw3pv8b 2 жыл бұрын

@@kompiuterapiia Ещё раз спасибо за видео. Есть одна просьба - подскажите, где можно почерпнуть информацию, чтобы кнопка для запуска макроса была на другом листе данной книги? Кстати, если нет у Вас видео - создайте. Лист базы данных. Другой лист форма для заполнения и кнопка. Думаю, это будет востребовано на Вашем канале.

@kompiuterapiia 2 жыл бұрын

На канале новое видео, как раз Ваш случай)))

@Alex_R.T. 3 жыл бұрын

Просьба к автору: на сайт выкладывать не только код, но архив с документами, что бы можно было скачать и запустить пример из видео.

@kompiuterapiia 3 жыл бұрын

В большинстве случаев так и делаю!)

@KVladimir_OD 9 ай бұрын

а использовать в word Рассылки - это не по феншую?!

@user-fj6tb9sh6t 3 жыл бұрын

Добрый день. Если оставить 1 строку и 3 строку, а вторую не ставить, то он выводит только первую и выходит из цикла, пишет всё готово. 3 не берет в расчёт. Как можно исправить?

@kompiuterapiia 3 жыл бұрын

Здравствуйте, как правило, сколько пользователь в таблицу строк добавил, столько он и хочет на выходе получить файлов. Если Вас не устраивает вариант удалить не используемые строки, то выполните сортировку таблицы так, чтобы в столбце "порядковый номер" цифры оказались в начале, а пустые ячейки в конце. Тогда макрос сформирует сперва данные с отметкой и остановится на пустых строках.

@user-fj6tb9sh6t 3 жыл бұрын

@@kompiuterapiia Хорошо, так работает, проверял. Спасибо.

@user-ty2nq6li7g 2 жыл бұрын

Так можно удалить первое условие if, а ко второму добавить else т.е. когда ячейка пустая, он добавляет счетчик и переходит к следующей ячейке не создавая документ)

@antoninaklicenko7651 3 жыл бұрын

Выдает ошибку на 5 строку кода: HomeDir$ = ThisWorkbook.Path (говорит что HomeDir$ Variable not defined) понимаю что какая-то мелочь, но код из-за нее не фунциклирует! Помогите!!!

@kompiuterapiia 3 жыл бұрын

Проверяйте все с самого начала, что то сделали не так, переменную не объявили, сверьтесь с видео, и в описании под роликом есть ссылка на скачивание архива с рабочим файлом.

@antoninaklicenko7651 3 жыл бұрын

@@kompiuterapiia Я наверное глупая...)но не понимаю в чем дело Sub MakeLetterDoc() Dim wdApp As Object Dim wdDoc As Object HomeDir$ = ThisWorkbook.Path Set wdApp = CreateObject("Word.Application") counter% = 4 Do

@antoninaklicenko7651 3 жыл бұрын

у меня исходные данные в умной таблице, может в этом дело?

@kompiuterapiia 3 жыл бұрын

В VBA tools reference подключен Microsoft office xx object library? Вместо хх версия офиса

@kompiuterapiia 3 жыл бұрын

Что значит умная таблица?

@dadmanWhite 3 жыл бұрын

файл не создается, все сделал по инструкции

@dadmanWhite 3 жыл бұрын

Выделяет желтым строку - Sub main()

@kompiuterapiia 3 жыл бұрын

В описании к видео есть ссылка скачать файл, по которому я делал это видео. Скачай, сравни, запусти.

@kompiuterapiia 3 жыл бұрын

Надо проверить не висит ли в диспетчере задач копия word, в последующих частях про шаблоны я показывал как с этим бороться.

@dadmanWhite 3 жыл бұрын

@@kompiuterapiia скачал запустил, также выделяет. Ворд не висит, проверил

@dadmanWhite 3 жыл бұрын

все получилось, незнаю че конкретно исправил, но полазил, поисправлял по примеру. И видимо нельзя запускать макрос пока открыт код)

@Alex_R.T. 3 жыл бұрын

⚠️ Если не работает (из личного опыта) 1. Название файла не может содержать некоторые символы (пример ":"). Эта строка не выполняеться FileCopy HomeDir$ + "\template.doc", HomeDir$ + "\" + NPP$ + "_" + ID$ + "_" + DataC$ + ".doc" 2. Если указана другая программа для открытия доков по умолчанию ничего работать не будет.

@user-uw5rx8se7i 3 жыл бұрын

Музыка мешает.

@user-qy8xi6yx2f 10 ай бұрын

ДЕБИЛЬНАЯ ФОНОВАЯ МУЗЫКА (ТЯЖЕЛО ВОСПРИНИМАТЬ ВИДЕО). ПО СУТИ - ИЗЛОЖЕНИЕ ОСТАВЛЯЕТ ЖЕЛАТЬ ЛУЧШЕГО. АВТОРОР ЗВЕЗД С НЕБА НЕ ХВАТАЕТ, НО ВЕДЕТ СЕБЯ КАК ЗВЕЗДА.

@user-yh5ni9bu9i Жыл бұрын

Ужасно, вы пишете модуль 20 минут. Задача решается в течение 5 минут - время заполнения данными умной таблицы и все, вы же предлагаете изучать язык VBA