"Одноразовая" пользовательская функция

[Avia]

Привет. Можно ли сделать следующее: есть своя функция в модуле, например вставляет перед текущей ячейкой разделитель страниц (для печати) или просто выдает MsgBox. Нужно что бы после своей первой отработки она прекратила свою деятельность. Смысл - Excel файл генерится сторонней программой, не умеющей вставлять разделители\картинки и т.п. Но в шаблоне можно установить функцию, которая отрабоботает в нужном месте в момент генерации этого итогового файла. Проблема: как только пытаешься внутри функции стереть формулу текущей ячейки или прописать value в другую происходит ошибка вычисления функции - причину примерно понимаю - можно ли обойти, может кто сталкивался. Спасибо.

'Пример: в ячейке B1 стоит =TEST()
'Вопрос: Как в ней изменить другую ячейку

Public Function TEST() As String
MsgBox (Range("A1").Value + 1)
Range("A1").Value = Range("A1").Value + 1
TEST = ""
End Function

[GSerg]

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