Em um artigo anterior comentei sobre algumas funções internas aplicáveis à estatística. Pois então, apesar da grande quantidade de funções disponibilizadas no OpenOffice Calc, pode ser que em algum momento você precise criar uma função específica. Logo...
Pronto! Você acabou de construir a sua função. Agora grave a função e a planilha. Salve cada um de uma vez. Vai para a sua planilha e faça o que você fez, funcionar. Use a equação citada no artigo para testar e calcular as raízes, verifique se o resultado da primeira raiz é 3 e o da segunda é -5.
Acompanha abaixo como você deve proceder para testar a função:
Escolha uma célula qualquer e digite:
=bhaskara(
Dê ENTER!
Isso mesmo, não feche os parêntesis, pois a função vai pedir os parâmetros para realizar o cálculo! A cada janela que surgir, informe os valores a seguir:
coeficiente A: digite 1
coeficiente B: digite 2
termo C: digite -15
Agora você já deve estar vendo o primeiro valor para X1 = 3, dê OK e visualize o segundo valor para X2 = -5. Está acabado. Se você desejar melhorar esta ou criar outras funções já dá. Você, com esse artigo, já tem conhecimento de como se cria uma caixa de entrada, de como se define uma variável, como se usa operadores matemáticos no editor Basic do pacote OpenOffice.org e com isso não precisa ficar amarrado às funções que acompanham o pacote.
[4] Comentário enviado por JediMai em 29/09/2020 - 16:15h
E tem como criar uma função em que os valores sejam buscados diretamente de determinadas células da planilha, seja em endereços fixos, ou endereços relativos?
Tipo, eu inserir a função em uma célula H1, por exemplo, e a formula buscar os valores nas três células das colunas anteriores, etc?
[5] Comentário enviado por jlvidals em 08/10/2020 - 08:27h
[4] Comentário enviado por JediMai em 29/09/2020 - 16:15h
E tem como criar uma função em que os valores sejam buscados diretamente de determinadas células da planilha, seja em endereços fixos, ou endereços relativos?
Tipo, eu inserir a função em uma célula H1, por exemplo, e a formula buscar os valores nas três células das colunas anteriores, etc?
Tem como sim!
Basta vc utilizar o mesno raciocinio da função deste artigo. Se for buscar valores pode operá-los na própria função (soma, subtração, etc) se for buscar textos pode concatenar o resultado na própria célula.
[6] Comentário enviado por Telvabjr em 27/01/2021 - 11:22h
Fiz o meu assim:
Function Bhaskara(doubleA, doubleB, doubleC) As String
Dim doubleDelta, doubleX1, doubleX2 As Double
doubleDelta=Val((doubleB*doubleB)-(4*doubleA*doubleC))
if doubleDelta < 0 then
print "A equação não tem solução real !"
exit function
endif
doubleX1=(-doubleB+sqr(doubleDelta))/2*doubleA
doubleX2=(-doubleB-sqr(doubleDelta))/2*doubleA
msgbox("X1 = " + doubleX1 + "; X2 = " + doubleX2)
End function