page8
LibOBasic-3-Calc-Flat-A4-pt-br-v111..ods
8 de 8
Nome da função, parâmetros e tipo de resultados dependem da função selecionada
☞
Dim FCalc As Object
Dim Results As Long
FCalc = CreateUnoService("com.sun.star.sheet.FunctionAccess")
Results = FCalc.callFunction("SUM", Array(1, 55, 321, 8))
Dim FCalc As Object
Dim Results As Double
Dim Params(1) As Variant
Params(0) = 1,2345 'number to round
Params(1) = 3 '3 places
FCalc = CreateUnoService("com.sun.star.sheet.FunctionAccess")
Results = FCalc.callFunction("ROUND", Params())
Criar uma função Calc
Criar
Exemplo : calcular a área de um trapézio (S = ((B + b) / 2) × H)
Function AreaTrapezio(GB As Double, PB As Double, H As Double) As Double
AreaTrapezio = ((GB + PB) / 2) * H
End Function
Uso no Calc
Creditos
Baseado na versão 1.11 de 13/01/2018 / Tradução: 02/04/2019

O nome da função deve ser seu nome em inglês.
Para obter a função Nome em inglês, mude temporariamente para a exibição de nomes de função
do English Calc, em Ferramentas> Opções> LibreOffice Calc> Fórmula, Usar nomes de
funções em inglês.
Exemplo 1
(function SOMA())
Exemplo 2
(function ALEATÓRIO())
Se A2 é a base grande, A3 a base pequena e A4 a altura, a área do trapézio é obtida inserindo
a seguinte fórmula em uma célula: =AREATRAPEZIO(A2;A3;A4)
☞
A macro recebe os valores dos argumentos e não o objeto da célula.
☞
A macro retorna um valor. Não se aplica a uma célula.
☞
☞
A função deve estar localizada em uma biblioteca acessível em tempo de execução
(e.g.Standard biblioteca do documento ou usuário) (caso contrário, produzirá o erro #VALUE!
error).
Author : Jean-François Nifenecker – jean-francois.nifenecker@laposte.net
Tradução para pt_br: Gilberto Schiavinatto – gilberto@schiavinatto.com