Boa noite a todos, estou com uma dúvida na criação de uma macro:

Para fixar uma determinada célula utilizei o seguinte comando


dim document   as object
dim dispatcher as object

document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "ToPoint"
args2(0).Value = "$C$1"
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args2())


e agora tentei inserir um texto nesta célula utilizando o seguinte comando
(que não funcionou)

dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Text"
args3(0).Value = "Marcus Gama"
dispatcher.executeDispatch(document, ".uno:InsertText", "", 0, args3())

alguém poderia por favor me dizer o que estou fazendo de errado e como
corrigir.

Estou utilizando o manual de "Introdução às Macro (Capitulo 13)" que é
ótimo,
pois entendi grande parte do conceito, mas to pecando nas sintaxes.

A intenção do macro é simplesmente apontar para uma célula e adicionar
um texto.

Obrigado,

Ronaldo.

-- 
Você está recebendo e-mails da lista usuarios@pt-br.libreoffice.org
# Informações sobre os comandos disponíveis (em inglês):
  mande e-mail vazio para usuarios+h...@pt-br.libreoffice.org
# Cancelar sua assinatura: mande e-mail vazio para:
  usuarios+unsubscr...@pt-br.libreoffice.org
# Arquivo de mensagens: http://listarchives.libreoffice.org/pt-br/usuarios/

Reply via email to