скорее всего, стоит фильтр

и ветки по PQ и PP уже тоже напрашиваются.
Я бы оставил общую, если варианты решения могут быть разные, и посылать в профильную, если какой-то один  

Новичок_, да я вам, собственно, ничем не помог, но пожалуйста  

если PQ не при чём, то давайте пример в файле, что там и как сбивается (2 таблицы: ДО вставки и ПОСЛЕ) и будем разбираться  

Дмитрий Овчинников, при изменении PQ таблица перевыгружается, так что надеяться ни на какие ссылки нельзя - только проверять названия столбцов.

вообще нет. Вы хоть где-то о выгрузке PQ вычитали в этой теме? Нет. Вот и создавайте ноовую по своей специфической задаче

там, может, и кода никакого нет - переливаем тут из пустого в порожнее  

Лина Камалитдинова, здравствуйте
Редизайнер таблиц

evgeniygeo, тото же
    Можно ещё в архив запароленный положить, но и так достаточно надёжно  

если пароль известен не только вам, то он имеет мало смысла — его разболтают и всё  
    Можно проверять учётную запись, железо и характеристики компа, но это не гарантия.

    Если в книге есть макросы для её работы, то можно запускать и любые другие. Повесьте на событие открытия книги или в начало любого макроса свою [мнимую] "проверку".
    Если кода нет, то в чём "ценность"?

в таком случае, жду текст из ячейки B2   Удачи!  

Файл
TryToOpen.xlsx (14.5 КБ)

а просто запаролить файл?

Кирилл Шумилов, попробуйте скопировать ячейку с нужной формулой и вставить в выделенные ячейки (можно выделить несколько отдельных областей с зажатым Ctrl) с параметром "Только формулы"

Anton, здравствуйте
Файл-пример с листами "до применения" и "после"

я тоже с этого начинал  
Создавайте темы с интересующими вопросами и разбирайтесь  

evgeniygeo, точка не является служебным символом, поэтому хоть и может (как и в этом случае), но совершенно не обязана быть в квадратных скобках перечня символов  

не понял, в чём прикол - вроде всё верно показал  

это надо учитывать, конечно  

для диапазона из нескольких областей нужен цикл по областям  

можно макросом вычислять и вставлять, когда и куда нужно. Освободится куча ресурсов, участвующих в постоянном пересчёте.

Msi2102, спасибо  

Денис Долинский, пожалуйста)
Редактируйте сообщение вместо написания нового. Чтобы модераторы удалили ошибочное сообщение можно оставить в нём текст del

NextSheet = Sheets(Cell.Worksheet.Index + 1).Range(Cell.Address)

Дмитрий(The_Prist) Щербаков, проблема может ещё ещё в том, что копируются несвязанные диапазоны. Может их сначала скопировать на служебный лист и потом одной областью перенести в другой файл…

оригинал тут

Ігор Гончаренко, ну вообще-то условия и принцип работы формулы изложены в файле "Что требуется".
Вам с медведем не угодишь - то задачу подавай, то многабукаф. А если в задаче много условий, как её описать коротко?  
    Ну и не стоит забывать, что иногда действительно нужно просто поправить, что есть, а не выяснять всю историю и сооружать что-то новое "как положено"  

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

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

В, здравствуйте
Можно вот так руками в 4 шага сделать: Сцепка + По столбцам + Транспонировать + СуммЕсли

Скрин и Файл
Скрин Файл test987564.xlsx (9.13 КБ)

…или макросом уже тогда

Денис Долинский, вот вам пример вложенных ЕСЛИ

Денис Долинский, сообщения, идущие подряд нужно дополнять, изменяя первое, а не плодить новые

насколько я знаю - нет