[Resolvido]Passar valor do formulario para o sub

Boa tarde amigos

Estou a passar o valor de um campo do formulário principal para o subformulario com esta formula na origem do control:

=[Formulários]![Movimentação]![Banco]

Mas se o subformulario não tiver registos o valor não é mostrado no subformulário.

Nome do formulario Principal "Movimentação" nome do campo com o valor  "Banco"
Nome do subFormulario "frmVendasMensais" nome do campo que devia ter o valor "txtBanco"

Os 2 formulário não são ligados por campo nenhum.

Como dar a volta a isto ?

Obrigado

Boa tarde grande Assis,

Será que não funciona se ao introduzir o valor no subformulario, a sua consulta do seu subformulario actualizasse?
Vou tentar aqui do meu lado e ver o que se pode fazer..
Pode postar BD???

Abraço...

Roberto

Sim quando o subformulario tem um registo o campo "txtBanco" do subFormulario "frmVendasMensais" fica logo com o valor correto.

Mas antes de gravar este registo no subformulario o valor a passar do formulario Principal "Movimentação" campo "Banco" já lá está.

Obrigado

Olá Assis, sempre uso a função Nz para tratar valores nulos, ela serve para quando o valor for null retornar uma valor referido
tipo Nz([campo],"") que se for null retorna ""
mas quando o formulario vem com registros vazios ele nao volta nem nulo, volta erro

entao eu faria

dim y
on error goto t1
y=Nz([Formulários]![Movimentação]![Banco],0)
me.txbanco=y
exit sub
t1:
me.txbanco="" ou me.txbanco=0


tudo isso porque quando a base de dados nao tiver dado e tiver vinculado um campo tipo total em outro form
ele volta como erro e nao como vazio

Cleber Botelho

Dá o mesmo resultado.

Obrigado

nao da para postar parte do seu banco para a gente ver melhor?

Boa tarde Assis,

Já consegui Resolver?

Abraço...

será que o evento "ao ocorrer erro" não poderia resolver

Boa tarde amigos

Não Roberto ainda não consegui.
Anexo exemplo

https://dl.dropboxusercontent.com/u/8169944/Exemplo%20Assis.zip

Abrir BD.

No formulario Menu clikar em "Registar" para abrir outro formulario.

No formulario que abriu tem um valor a vermelho de 850,00. Este valor está no formulário "Movimentação" depois é para ocultar
Fazer aparecer esse valor em baixo á direita aonde diz  "Saldo da Conta" no campo chamado " txtBanco " no subformulário "frmVendasMensais"  

Obrigado

não consegui tirar da "leitura" assim nao da para gravar
mas ja tentou colocar direto no campo txtbanco: =[Formulários]![Movimentação]![Incorporado103].[Formulário]![SomaDeVlr]
ou =[Forms]![Movimentação]![Incorporado103].Form.[SomaDeVlr]
pois se funciona no form talvez funcione no sub

Tentei direto não resulta.

Com que office é que abriu a BD para dar só de leitura ?

Gostava de saber qual será a função que provoca isso ?

Aguardo

Obrigado

Versão 2010

Cleber

Eu ainda uso o 2007, e esse é um dos problemas porque ainda não passei para o 2010.

As minhas BD quando as abro em estrutura no 2010 ou superior acontece isso. Base de dados só de Leitura

Porquê não sei, se alguem ajudar a descobrir aonde está o erro pasarei logo para 0 2010

Mestres que usam o 2010 ou superior, preciso de ajuda  neste meu caso para puder passar também para o 2010.

Obrigado

Boas Assis
No campo Banco depois de atualizar:
Me.frmVendasMensais!TxtBanco = Forms!Movimentação!Banco
Pina

Pina

Neste momento estou no iPad. Não posso testar.
Testou?
Obrigado

Boas Assis
Sim fiz um teste e funcionou
Pina

criei um novo bd em 2010 e importei todo o banco
veja se consegue fazer download
https://drive.google.com/file/d/0B7JagX_zTpdhYnI1VGlLWFJBY2c/view?usp=sharing

entao, a solução seria colocar um campo vazio ou deixar o txbanco vazio e
inserir via codigo "ao carregar" no subform Incorporado103
e tambem chamar a função ao clicar no botao gravar

só que o botão gravar está dando erro, talvez descubra o porque do erro

ja esta funcionando o valor txbanco mas esta dando erro no botao gravar

Pina
Poste o exemplo com a sua alteração por favor
Aguardo

Boas
Não consigo anexar o exemplo apesar de só ter 35 KB
Pina

Bom dia Pina

DropBox ..

Bom dia Assis
Como envio para DropBox? ou quer envie poe email e coloca no forum o exemplo?
Pina

Pina
já mandei o email por msg privada
Obrigado

Pina
Com a sua ideia resolvi ... veja
Obrigado

https://dl.dropboxusercontent.com/u/8169944/Exemplo%20Assis.zip

Boas Assia
Ainda bem que ficou resolvido
Como só tenho o Access 2003 neste computador depois vejo noutro
Abraços
Pina