ff= ROUND(2,348;2)

[Vlad55515]

Кто знает, что за ошибка, пишу в макросе

ff= ROUND(2,348;2)

ругается пишет непарный скобки, уже и не знаю что делать

[bigor]

В формулах макросов разделитель запятая, а у вас точка с запятой

ps не уверен что в макросах поддерживается round

[Yakov]

Надо так:

Код Выделить Развернуть


BasicLibraries.LoadLibrary("Tools")
ff=Strings.ROUND(2.348,1)

Round есть в библиотеке Strings

[bigor]

Round есть в библиотеке Strings

не нашел у себя такой. Ее нужно доустанавливать?

[Yakov]

Модуль Strings стандартный, из библиотеки Tools, только его надо подгрузить:

Код Выделить Развернуть


BasicLibraries.LoadLibrary("Tools")


[bigor]

Разобрался. Спасибо

[Vlad55515]

Спасибо большое, за подсказку в конечном итоге получилось


BasicLibraries.LoadLibrary("Tools")
ff=Strings.ROUND(oCell1.getValue,1)

подсказали за функцию ROUND,

а ROUNDDOWN есть?

[rami]

а ROUNDDOWN есть?

А потом вы захотите ещё кучу других функций...
Тогда уж сразу:

Код Выделить Развернуть

Sub Main
Dim serv, n
serv = createUnoService("com.sun.star.sheet.FunctionAccess")
n = serv.callFunction("ROUND", Array(12.34567, 3))       'ROUND можно заменить любую функцию CALC (и соответствующие ей параметры)
Print n
End Sub

[Yakov]

а ROUNDDOWN есть?

есть =int()  - отбросить дробную часть

[Vlad55515]

Благодарю за ответ INT пробовал значение -3,65 делает -4, а хотелось бы -3

[mikekaganski]

Для этого есть функция Fix.

[Vlad55515]

Благодарность спасибо за все ответы, но все равно проблема, в ячейках оказались не числа а текст вида 00003,65 при всех функциях значение дает 0

[bigor]

Попробуй val

[Vlad55515]

Попробовал дала 365))

[Vlad55515]

Запятую съедает