как использовать daysinmonth в макросе?

Автор rimus, 27 декабря 2018, 22:47

0 Пользователи и 1 гость просматривают эту тему.

rimus

Ребят может кто-нибудь сталкивался с такой проблемой...
Нужно в существующий макрос добавить функцию определения
количества дней в выбранном месяце, но при ее использовании
вылазит ошибка, что подпрограмма или функция не определена.
Пример:

Dim kolvo_days As Integer
kolvo_days=daysinmonth("2018-02-01")

Скорее всего нужно данную функцию подключать через какую-то либу,
но как не могу разобраться. Подскажите если кто с подобным сталкивался.

rami

Так:
Sub Main
svc=createUnoService("com.sun.star.sheet.FunctionAccess")
days=svc.callFunction("DAYSINMONTH",array("2018-02-01"))
Print days
End Sub

rimus

Спасибо огромное!!! С наступающим новым годом! Тема закрыта!