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

drausio

Aprofundando mais no OpenOffice Calc, vamos agora criar, via código, uma macro que permite caminhar sobre as células, inserindo ou lendo valores.

[ Hits: 48.899 ]

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

1 0

Denuncie Favoritos Indicar Impressora

Procedimento CaminharSobreCelulas

Primeiramente vamos criar um procedimento chamado CaminharSobreCelulas.

Este procedimento vai possuir três parâmetros.

intColuna : recebe o número da coluna;
intLinha : recebe o número da linha;
Valor : recebe o valor que será adicionado na célula.

Veja o procedimento a seguir:

Sub CaminharSobreCelulas(intColuna, intLinha as Integer, Valor)

   Dim oMovPasta as Object
   Dim oCelula as Object
   Dim oPasta as Object
   Dim oDocumento as Object

   oDocumento = ThisComponent
   oPasta   = oDocumento.Sheets
   oMovPasta = oPasta(0)
   oCelula = oMovPasta.GetCellByPosition(intColuna, intLinha)
   oCelula.Value = Valor

End Sub

Sobre o procedimento:

oDocumento : recebe o documento em que a macro está sendo executada;
oPasta : recebe as pastas do documento;
oMovPasta : recebe a pasta na qual vamos nos locomover (oPasta(0) é primeira pasta);
oCelula : recebe a posição na célula que o valor será inserido;
oCelula.Value : insere o valor na célula indicada (nos parâmetros).

Página anterior Próxima página

Páginas do artigo

   1. Informações gerais
   2. Criando um módulo
   3. Procedimento CaminharSobreCelulas
   4. Procedimento Escrever
   5. Executando seu procedimento
   6. Conclusão

Outros artigos deste autor

Configurar Speedy Home na distribuição SuSE 10

OpenOffice.Org Calc Basic - Conhecendo o editor

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

O que são Generators no Firebird

Leitura recomendada

Conhecendo a planilha do OpenOffice

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

Configuração do OpenOffice para o português do Brasil (pt-BR) a partir de uma instalação do BrOffice

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

Instalando o IBM LOTUS SYMPHONY Beta3

Comentários

[1] Comentário enviado por CABELO em 13/07/2006 - 09:50h

Parabéns, tenho orgulho de ser o seu amigo...

Abraços.

Cabelo...

(SOMOS LIVRES, USAMOS GNU/LINUX)

0 0

[2] Comentário enviado por sidilinux em 13/07/2006 - 17:04h

Em primeiro lugar, Parabéns brother , tah muito bom esse artigo!!!
porém tenho uma dúvida e acho que vc pode me ajudar.....

quero saber como faço para executar uma "macro" por linha de comando???

se vc puder ajudar agradeço muito
vlw

1 0