[Resolvido]Botao no formulario puxando campo de outro formulario

Boa Noite meus amigos deste forum:

Gostaria de tirar uma dúvida, não sei se vou conseguir explicar direito o que quero. Vamos lá:

Possuo dois formularios (frm_imoveis e frm_morador).

Esses formularios tem os seguintes campos:

frm_morador = nome, cpf, "endereço" .....
frm_imovel = endereço, bairro, ....

Gostaria colocar um botão no frm_imovel, que quando clicar nele, automaticamente abriria o frm_morador e puxasse automaticamente o campo endereço.

O campo do frm_Imoveis é txtendereço e o campo do frm_morador é txtendereco

Desde já agradeço .....

https://www.youtube.com/watch?v=uNKaKhb09d4
Veja nesse video... la tem o que precisa.

Eu assisti esse vídeo sim, só que não salva o registro com o nome que foi puxado.

Ou seja, quando clico no botão que fiz, o campo vai, só que não esta salvando.

Pra salvar o valor de uma cx texto q esta no formulario, voce deve ir na propriedade desse campo e no item FONTE DE CPNTROLE selecional algum campo da tabela. Caso contrario sao valores temporarios q se perdem ao fechar o formulario. No video indicado ele apenas ensina a fazer mas com valores temporarios. Se colocar o campo la na Fonte de Controle ira armazenar nesse campo o valor transportado...

Veja o exemplo
E caso queira Fechar o Primeiro Formulário, basta add essa Linha na ultima instrução do Botão!

Código:


DoCmd.Close acForm, "fml_campos"


fml_campos é o nome do Formulário a ser Fechado...

Amigo Fabio Paes. Não sei se estou fazendo o correto, pois não deu certo. teria como me enviar o seu e-mail para mandar meu Banco de dados para você dar uma olhada e case consiga me explicar.

O campo que eu quero puxar é do frm_imovel (Endereço) para o frm_cadpermissionario (txtEndereço). salvando as informações.

Desde já agradeço.

Fabiopaes@live.com manda agora q vejo

Fabio:
Acabei de lhe enviar
Obrigado

Troque o Comando do seu Botao Distribuir por esse:

Código:


Private Sub Distribuir_Click()
DoCmd.OpenForm "frm_cadpermissionario", acNormal, , , acFormAdd 'acForAdd significa que ele abre o formulario em Novo Registro
Forms![frm_cadpermissionario].txtendereco = Me.Endereco
'Fecha o Formulario Imavel apos abrir o Formulario Frm_CadPermissionario
DoCmd.Close acForm, "frm_imovel"
End Sub



Erro Encontrado:

Você estava Tentando enviar para o Campo txtendereco do Formulario frm_cadpermissionario um valor do Campo CboEnderimovel.Colimn(1) Campo esse que eu Não achei no seu Formulario frm_imovel.

O que está acontecendo.

O campo Endereco em questão ele transporta para o novo campo do frm_cadpermissionario. Até aí blz.

Mas quando pesquisa o permissionario ele não está salvando no frm_cadpermissionario.

Eu não teria que colocar algum comando no frm_cadpermissionario para que quando transportasse, ele salva esta modificação?
Ou será que tenho que fazer alguma relação entre esses dois formularios?

Teve um amigo Nivaldo que colocou o seguinte comando para outra pessoa:

No formulário CADASTRO, no evento Ao Clicar do botão de comando colaca:
DoCmd.OpenForm "CAD_PAC_EXAMES", , , , acFormAdd

No formulário CAD_PAC_EXAMES, no evento AoAbrir coloca:
DoCmd.GoToRecord , , acNewRec
Me.Cod = Forms!CADASTRO!Funcionario
Me.EmpFantasia = Forms!CADASTRO!Empresa

Tentei adaptar para o meu e não funcionou.

Obrigado mais uma vez

Amigão, eu te passei o codigo completo a cima...
Veja so:
DoCmd.OpenForm "frm_cadpermissionario", acNormal, , , acFormAdd
Nessa linha ele faz o que voce falou, abre o formulario em um Registro Novo...

Siga as instruçoes que te passei a cima e dara certo sim, pois esta funcionando no seu BD...

Amigo Fabio ....

Desculpe, talvez você não entendeu, a transferencia do campos está OK.

Só que quando abrimos frm_pesquisapermissionario para verificar o endereço ocupado pelo permissionãrio, o mesmo não está gravado.

Se de repente tiver como você fazer esse teste no arquivo que te mandei e me mandar ele, lhe agrqadecerei e estudarei para verificar como foi feito.

Vocês deste Forum são maravilhosos. Ajuda muito a nós que temos pouco experiência em access.

Mais uma vez lhe agradeço pela ajuda e paciência.....

ve la seu email... mandei pra vc...

Cara ....
Só vocês mesmo .....

Ficou perfeito ... então o problema era que o campo Endereço estava desativado....

Mas uma vez muito obrigado pela sua ajuda....

Só mais uma dúvida ...

Teria como quando distribuir um imóvel, caso ele já esteja ocupado, não conseguir fazer outra ocupação ??

Sim... depois faco um exemplo p vc..

Ve la seu Email, mandei um exemplo...

Amigo Fabio:

Perfeito o que você fez, mandei para o seu e-mail uma nova dúvida....

Eu prometo que é a última. kkkkkk

A duvida a cima do Amigo era quanto a Mudar mais de um campo na tabela através do comando UPDATE

Ficou assim:
CurrentDb.Execute "UPDATE tbl_imovel SET Distribuido =-1, Status = 'Ocupado' WHERE Codimovel = " & Me.txtCodimovel & ";"

Atualiza (marcando)o campo Distribuido que é do tipo Sim/Nao e o Campo Status muda para Ocupado




Postando só pra caso alguém tenha essa duvida...

Muito Obrigado mesmo Fabio Paes.

Você foi mil...... Mais uma vez agradeço pela ajuda......

Ficou Espetacular...