Пересчитать формулу после "Сохранить как"

[agregator]

Здравствуйте уважаемые прграммисты. Подскажите как сделать так, чтобы формула пересчитывалась автоматически после сохранения книги под другим именем. Формула

=ПСТР(ЯЧЕЙКА("имяфайла";A1);НАЙТИ("[";ЯЧЕЙКА("имяфайла";A1))+1;НАЙТИ(".xls";ЯЧЕЙКА("имяфайла";A1))-НАЙТИ("[";ЯЧЕЙКА("имяфайла";A1))-1)

. Пробовал добавить летучую функцию

=СУММПРОИЗВ(0;0)+ПСТР(ЯЧЕЙКА("имяфайла";A1);НАЙТИ("[";ЯЧЕЙКА("имяфайла";A1))+1;НАЙТИ(".xls";ЯЧЕЙКА("имяфайла";A1))-НАЙТИ("[";ЯЧЕЙКА("имяфайла";A1))-1)

не помогло. Private Sub Workbook_BeforeSave, тоже не работает.

[Watcher_1]

Смог придумать такое. Тыкаете на любую ячейку после сохранения и формула обновляется

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    Sheets("Карточка").[C2].Formula = Sheets("Карточка").[C2].Formula
End Sub

[agregator]

Watcher_1, спасибо за ответ, но это не совсем то, что я хотел. У меня получилось без летучих формул и без макросов. Добавил на лист формулу =Карточка!C6 и формула стала пересчитываться автоматически после "Сохранить как".
Уважаемые программисты, как вы думаете почему это работает?