[oodisc] Функции

[Орлов Владислав Джонович]

В сообщении от Среда, 25-Янв-2006 13:28 Peter (Zebar) Astakhov написал(a):
> Хочу в OO Calc написать свою пользовательскую функцию. Как это сделать
> проще всего?
Проще всего - это если она пишется только для себя. Тогда просто пишем 
функцию...
Ну, например, чуть-чуть "причесать" результат перевода суммы в сумму прописью 
(не помню где брал саму sumpropis(chislos, vids, dengis, polnos), а сведения 
об авторе в комментариях не значились):
Function full_SumPropis(HowMany) As String
Dim str_rez As String
str_rez = Trim(sumpropis(HowMany, 0, 1, 0))
full_SumPropis=Trim(Format(HowMany, "# ##0.00")&" руб. ("  & str_rez & ")")
End Function 
То есть, получить сумму прописью и выдать строку вида "40,12 руб. (сорок руб. 
12 коп)" (при этом три последних параметра зашиты наглухо).
В таблице просто пишем =full_SumPropis($B4) и все работает...

А вот если функцию нужно будет отдавать пользователям, да при этом мастер 
функций ее распознавал, да чтобы диапазоны значений, а не отдельные клетки 
обрабатывал... Просто - вряд ли получится. Хотя - если честно - не так все и 
страшно!..

-- 
Всего доброго!
Владислав Орлов
Начальник отдела программного обеспечения
ЗАО СК "Профессиональная Защита" ("Про-За")

PS. Для большего удобства общения настоятельно рекомендую установить себе 
OpenOffice.org - он того стоит (хотя и совершенно бесплатен!)