(5) прикольно, только мне не нравиться, вообще любые текстовые сравнения в такой ситуации не есть гуд, они будут зависить от многих факторов....
и если уж на то пошло, то можно так
ТекстЯчейки=Ячейка.Text;
Если (Лев(ТекстЯчейки, 1)="#") и (СокрЛП(Ячейка.formula)<>"") Тогда
Сообщить(Ячейка.Value);
ИначеЕсли (СокрЛП(Ячейка.formula)="") Тогда
Сообщить(Ячейка.Value);
Иначе
Сообщить(ТекстЯчейки);
КонецЕсли;
ТекстЯчейки=Ячейка.Text;
Если (Лев(ТекстЯчейки, 1)="#") и (Лев(Ячейка.formula)="=") Тогда
Сообщить(ТекстЯчейки);
Иначе
Сообщить(Ячейка.Value);
КонецЕсли;
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший