Difference between revisions of "RU/kb/00000366"
From Wiki
Jump to navigationJump to search (RUsignyear) |
(del ForTemplateAllBottom) |
||
| Line 1: | Line 1: | ||
{{DISPLAYTITLE:База Знаний: Программирование. StarBASIC. Использование функций Calc в коде макросов}} | {{DISPLAYTITLE:База Знаний: Программирование. StarBASIC. Использование функций Calc в коде макросов}} | ||
[[RU/kb/macros|База Знаний: Программирование. StarBASIC. Макросы {{OOo}}]] | [[RU/kb/macros|База Знаний: Программирование. StarBASIC. Макросы {{OOo}}]] | ||
| − | __NOTOC__ | + | __NOTOC__ |
Для использования функций Calc в макросе можно воспользоваться функцией из проекта [http://codesnippets.services.openoffice.org/Calc/Calc.UsingBuiltinFunctions.snip Code Snippets]: | Для использования функций Calc в макросе можно воспользоваться функцией из проекта [http://codesnippets.services.openoffice.org/Calc/Calc.UsingBuiltinFunctions.snip Code Snippets]: | ||
Revision as of 08:21, 2 September 2010
База Знаний: Программирование. StarBASIC. Макросы OpenOffice.org
Для использования функций Calc в макросе можно воспользоваться функцией из проекта Code Snippets:
Sub callFunction
svc = createUnoService( "com.sun.star.sheet.FunctionAccess" )
' Calculate min of numbers.
arg = array( 10, 23, 5, 345 )
print svc.callFunction( "MIN", arg )
' Calculate min of values in cell range A1:A17
oSheet = ThisComponent.Sheets(0) ' Get leftmost sheet
oCellRange = oSheet.getCellRangeByPosition( 0, 0, 0, 16 ) 'A1:A17
arg = array( oCellRange )
print svc.callFunction( "MIN", arg )
End SubДанная функция требуется два аргумента:
- Первый — имя функции,
- Второй — её параметры, содержащиеся в массиве.
