OpenOffice.Org Calc Basic - Funções intermediárias

drausio

Aprofundando um pouco mais no Basic, editor de macros contido dentro do programa Calc, que faz parte do pacote OpenOffice. Este artigo ensina a utilizar as macros em um nível intermediário.

[ Hits: 64.298 ]

Por: Drausio Henrique Chiarotti em 28/06/2006 | Blog: http://lattes.cnpq.br/0543258204520217

0 0

Denuncie Favoritos Indicar Impressora

Funções de caixa de mensagem

Para aquecer, vamos exibir uma caixa de inserção de dados, em seguida uma caixa de mensagem e para finalizar, os dados digitados serão inseridos na planilha.

Abaixo do "End Sub", do "Sub Main", vamos criar uma nova função e inserir o código, conforme abaixo:

Function BemVindo() As String
   Dim strInfo As String 'variável do tipo string

   strInfo = InputBox("Digite seu nome") 'Caixa de entrada

   msgbox strInfo 'Caixa de mensagem

   BemVindo = strInfo 'Retorno da função
End Function

Seu código deve ficar conforme figura a seguir:

Clique em: Arquivo - Salvar

Vá até sua planilha, clique em: Arquivo - Salvar

E então execute a função:

Digite em alguma célula: "=BemVindo(" e pressione enter (não feche o parêntese).

Observe a figura a seguir:

Página anterior Próxima página

Páginas do artigo

   1. Informações gerais
   2. Criando um módulo
   3. Funções de caixa de mensagem
   4. Funções utilizando laços (If e While)
   5. Funções numéricas e de strings
   6. Utilizando funções de String
   7. Concluindo

Outros artigos deste autor

OpenOffice.Org Calc Basic - Caminhando sobre as células

O que são Generators no Firebird

OpenOffice.Org Calc Basic - Conhecendo o editor

Configurar Speedy Home na distribuição SuSE 10

Leitura recomendada

Prevenindo problemas com impressoras via Samba no Windows

Editores e processadores de texto para GNU/Linux

Instalando o IBM LOTUS SYMPHONY Beta3

Instalando a impressora Canon i250 no Linux

Criando formulário e subtotais no OpenOffice.org Calc

Comentários

[1] Comentário enviado por graco em 29/06/2006 - 11:22h

Muito bom! Gostei do artigo. um artigo que abre possibilidades. Já imagino criar meus proprios assistentes.....

0 0

[2] Comentário enviado por mochileiro em 29/06/2006 - 11:32h

Quero ver o povo daqui reclamar agora. Vão ter q estudar mesmo! material veio na hora certa!

0 0

[3] Comentário enviado por rgmmelo em 29/06/2006 - 13:55h

legal o seu artigo....a uns meses tive que instalar o office da MS pois tinha que fazer um trabalho da faculdade em VB pois nao conseguia um comando para imprimir nas celulas que certos valores do meu programa, já que o Cells(x,y)= nao funcionou em casa....
eh sempre bom ver estes tipos de artigos, eu mesmo tava pensando em escrever um.......

0 0

[4] Comentário enviado por Maycon Pires em 01/07/2006 - 11:40h

SHOW!!! Muito completo o artigo explica de uma forma bem linear, magine os proximos como virão show continue postando os artigos que são nota 10! vlw

0 0

[5] Comentário enviado por allanhc em 04/07/2006 - 00:13h

Excelente o artigo.
Sempre quis aprender a usar as macros mas nunca tive paciencia.

Só corrigir um errinho bobo.
Na função Lacos()

intNumFinal = Val(InputBox("Digite o número inicial"))

deveria ser:

intNumFinal = Val(InputBox("Digite o número final"))

Parabens

0 0

[6] Comentário enviado por seyfer em 19/01/2007 - 13:33h

Maloko, fiquei loko neste artigo...
To ficando viciado... manda mais buhahahahaha
Bom artigo este, parabéns
Falows.

0 0