Difference between revisions of "RU/kb/00000366"

From Wiki
Jump to navigationJump to search
(del ForTemplateAllBottom)
 
(7 intermediate revisions by 2 users not shown)
Line 1: Line 1:
{{DISPLAYTITLE:База Знаний: Программирование. StarBASIC. Использование функций Calc в коде макросов}}
+
<section begin=title /><noinclude>{{DISPLAYTITLE:База Знаний: Программирование. StarBASIC. </noinclude>Calc. Использование функций в коде макросов<noinclude>}}</noinclude><section end=title />
[[RU/kb/macros|База Знаний: Программирование. StarBASIC. Макросы {{OOo}}]]
+
{{BreadCrumbL10n|RU/kb/common/programming/macros}}
 
__NOTOC__  
 
__NOTOC__  
  
Line 29: Line 29:
  
  
{{RUsignyear|rail|Р. А. Алиев|2010}}
+
{{SignYear|rail|Р. А. Алиев|2010}}
{{KbMacrosBottom}}
+
{{RUkbMacrosBottom}}

Latest revision as of 17:34, 17 September 2011


Для использования функций 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

Данная функция требуется два аргумента:

  • Первый — имя функции,
  • Второй — её параметры, содержащиеся в массиве.











К началу страницы