Re: [pt-br-usuarios] Copiar dados em formulário

Olá!
Seria algo assim ?
' ------------------------------------
' SALVA FORMULARIO E ATUALIZA
' ------------------------------------
Sub Salva (Event as object)
Dim Form As Object
Form=Event.Source.Model.Parent
Form.updateRow()
End Sub

...
ou tente:

Form.ApplyFilter = True
Form.Reload

...
Para colocar o texto de um campo (txtCPF, por exemplo) em uma variável:

Dim oCampo as String
Doc = ThisComponent
DrawPage = Doc.DrawPage
Form = DrawPage.Forms.GetByIndex(0)
oCampo = Form.getbyname("txtCPF").text

Boa Sorte!


Em 3 de agosto de 2014 22:42, Sonise <sonigomes@uol.com.br> escreveu:

> Olá Pessoal,
>
> Preciso de uma ajuda. No Base, gostaria de saber como faço para que os
> dados de um campo de um subformulário após atualizado, sejam copiados no
> campo correspondente no formulário.
>
>
>
> Grata,
> Sonise
>
> --
> 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+unsubscribe@pt-br.libreoffice.org
> # Cancelar sua assinatura: mande e-mail vazio para:
>   usuarios+unsubscribe@pt-br.libreoffice.org
> # Arquivo de mensagens:
> http://listarchives.libreoffice.org/pt-br/usuarios/

-- 
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+unsubscribe@pt-br.libreoffice.org
# Cancelar sua assinatura: mande e-mail vazio para:
  usuarios+unsubscribe@pt-br.libreoffice.org
# Arquivo de mensagens: http://listarchives.libreoffice.org/pt-br/usuarios/