Как поменять формулы (ВПР) в нескольких однотипных файлах не открывая их?

Пользователь

Сообщений: 5 Регистрация: 11.02.2019

15.02.2019 19:16:35

Добрый день. Нужен макрос, который в однотипных файлах Т92, в ячейке С3 (например) вставит вместо значения формулу ВПР.
Нашел подобный макрос (файл post_48751 (1)), но не знаю как внедрить вместо значения формулу ВПР.
Спасибо за помощь!

Прикрепленные файлы

Т92.xls (209 КБ)
post_48751 (1).xls (30 КБ)

Hugo Пользователь Сообщений: 23795 Регистрация: 22.12.2012	#2 15.02.2019 20:34:02 Добрый день. Вместо "New Title" пишите "=vlookup(....) " - вместо многоточия то, что там Вам нужно. Все файлы должны быть доступны! Изменено: Hugo - 15.02.2019 20:35:01

bondar_aleksandr90 Пользователь Сообщений: 5 Регистрация: 11.02.2019	#3 15.02.2019 20:45:01 Вот что-то не получается, выдает ошибку

Hugo Пользователь Сообщений: 23795 Регистрация: 22.12.2012	#4 15.02.2019 20:56:25 У меня тоже. Потому что файла нет.

gling

Пользователь

Сообщений: 4260 Регистрация: 01.01.1970

15.02.2019 20:59:47

Цитата
bondar_aleksandr90 написал: выдает ошибку

Включите запись макроса -- запишите в С3 нужную вам формулу -- выключите запись макроса. Зайдите в редактор скопируйте то что прописано после знака = в кавычках "=......" вставьте это в замен "New Title", да и A3 в коде замените на C3.

Изменено: gling - 15.02.2019 21:01:39

bondar_aleksandr90

Пользователь

Сообщений: 5 Регистрация: 11.02.2019

15.02.2019 21:45:45

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

Если необходимо в нескольких ячейках вставить формулы?
Просто скопировать строку Sheets(1).Range("C3").Value = "..... и вставить ее ниже, меняя адрес ячейки?

_Igor_61

Пользователь

Сообщений: 3007 Регистрация: 18.07.2016

15.02.2019 21:50:12

bondar_aleksandr90, наоборот - сначала нужно указать куда , а потом что копируем (или присваиваем значение). А "С3" - это одна ячейка, после знака "=" ей присвоится то, что укажете. Range("A2:C5").Value=Range("A1").Value - всем ячейкам диапазона A2:C5 присваиваем значение из ячейки A1

Изменено: _Igor_61 - 15.02.2019 21:54:22

bondar_aleksandr90 Пользователь Сообщений: 5 Регистрация: 11.02.2019	#8 15.02.2019 21:54:54 _Igor_61, спасибо, так и планировал, просто неверно выразился

gling

Пользователь

Сообщений: 4260 Регистрация: 01.01.1970

15.02.2019 21:58:56

Попробуйте сначала скопировать и вставить вручную, посмотрите не изменилась ли формула, на нужные ли диапазоны ссылается. Если всё правильно, можно будет копировать макросом. Можете так же записать свои действия при включенной записи макросов, а потом посмотрите что получилось и подправите полученный код.

bondar_aleksandr90 Пользователь Сообщений: 5 Регистрация: 11.02.2019	#10 15.02.2019 22:06:07 gling, все получилось, но пришлось закрепить ячейку, по которой осуществляется поиск.