Criando uma função no OpenOffice.org Calc

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...

[ Hits: 33.145 ]

Por: jorge luiz vidal soares em 13/10/2009


Testando e concluindo



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.

Até a próxima!
Abraços,

Página anterior    

Páginas do artigo
   1. Introdução
   2. Testando e concluindo
Outros artigos deste autor

Introdução aos trabalhos com bases de dados no OpenOffice.org Calc

Básico do OpenOffice.org Calc

Estudo de funções de estatística básica no OpenOffice Calc

Criando formulário e subtotais no OpenOffice.org Calc

Filtragem de registros em bases de dados no OpenOffice.org Calc

Leitura recomendada

Dominando o BrOffice.org: Tabelas no Writer; Uso do Navegador de Objetos

Configurando a operadora Vono no Asterisk

Dominando o BrOffice.org: Pincel de Estilo, Sumários e Objetos OLE no Writer

Novidades do OpenOffice 2.0 e um comparativo com o MS Office 2003

Trabalhando com formas no BROffice Draw - Logomarca do Bradesco

  
Comentários
[1] Comentário enviado por hideoux em 13/10/2009 - 19:37h

Legal demais!
Precisamos quebrar o mito de que apenas o excel presta...
Eu utilizo muito Calc. Para tudo, e olha que não são coisas nada simples...

Quanto mais tutoriais tivermos com coisas avançadas, melhor!
Abraço,
Hideo

[2] Comentário enviado por diegofsouza em 13/10/2009 - 20:19h

Muito bom... gostei da artigo!
Vlws

[3] Comentário enviado por rocarva em 24/11/2009 - 15:41h

Nossa o Calc 3.1 faz coisas em basic e python, onde eu consigo mais coisas para estudar ???

[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


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts