Консультация № 64042
24.11.2006, 18:54
0.00 руб.
0 1 1
Здравствуйте! В рабочей книге Excel я написал функцию Сумма(C as currency) as string и вызываю
её в обработчике события данной рабочей книги:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Target.Offset(0, 1).Value = Сумма(Target.Value)
End Sub

Всё работает отлично число становится строкой, но когда я сохраняю её как надстройку
и подгружаю в Excel все мои модули появляются и в новой рабочей книге, но ничего не работает. Почему? Как заставить её работать?

Обсуждение

Неизвестный
25.11.2006, 20:52
общий
это ответ
Здравствуйте, Rewer8!
Не работает потому, что книгой она (функциясчитает надстройку, а в надстройке листы не изменяются и событие не происходит.
Как заставить работать красиво не скажу, т.к. надо знать что именно вы хотите автоматизировать, но на вскидку - можно сохранить файл не как надстройку, а как шаблон, и если потом создать новый файл по этому шаблону - функция должна работать. Только в надстройках Excel нужно разрешить макросы.
Удачи.
Форма ответа