защита формулы при перемещении аргумента

[tohdom]

Проблема: Необходимо запретить само-изменение формулы при копировании одной из ячеек-параметров (с помощью "защиты ячейки" не получается).

Пример:
Формула A1=A2+A3, если вырезать A3 и вставить в A4, то формула превратиться в A1=A2+A4, а нужно чтобы она оставалась исходной (значение А3 соответственно становится нулем/пустотой)

[DV68]

При создании формулы, содержащей ссылку на ячейку, эта ссылка обновляется, если:
1) ячейка была перемещена с помощью команды Вырезать (т. е. удалена) 2) перемещение ячейки произошло в результате вставки или удаления строк или столбцов. Если требуется, чтобы формула всегда ссылалась на одну и ту же ячейку, независимо от удаления расположенных над нею строк или перемещения ячеек, воспользуйтесь функцией ДВССЫЛ.
Для приведенного примера:
А1=ДВССЫЛ("A2")+ДВССЫЛ("A3")

[tohdom]

Спасибо. для приведенного примера действительно работает.
Но для моего частного случая увы нет:

=ДВССЫЛ("ЕСЛИ(A1=1;1;0)")

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

[tohdom]

Вариант номер два - через макрос - нид хелп

For i = 5 To 7
For j = 5 To 7

Cells(i, j).Select
ActiveCell.FormulaR1C1 = "IF(cells(i-4,j-4)="",1,0)" - нужно чтобы в каждую выделенную ячейку сувал такую формулу с и долларами. Цель формулы - если одна ячейка пустая ставить в другую единицу).

Next
Next


зы. если есть какой-то более красивый способ посчитать кол-во ячеек каждого вида (сожержащих определенное слово и пустых), подскажите.
Признаю, что выбрал топорный способ.

[EducatedFool]

нужно чтобы в каждую выделенную ячейку сувал такую формулу с и долларами

Доллары лучше "сувать" не в ячейки, а в карман

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

если есть какой-то более красивый способ посчитать кол-во ячеек каждого вида (сожержащих определенное слово и пустых), подскажите

Как раз для этого разработчики excel придумали формулы =СЧЁТЗ, =СЧЁТЕСЛИ и =СЧИТАТЬПУСТОТЫ

[tohdom]

ндааа...как всё просто

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

[tohdom]

тоже касается защиты.
можно как-нибудь запретить копироваться границам ячеек?
ужас как задолбало постоянно "восстанавливать красоту"

[EducatedFool]

можно как-нибудь запретить копироваться границам ячеек?

Сразу после вставки диапазона "с границами" в контекстном меню вставки выберите пункт "Использовать форматы конечных ячеек"

И "красота" сохранится.

[tohdom]

ясно, сделать чтобы это было умолчательно можно?