[Resolvido]Formulários

Boas pessoal,

Alguém pode-me ajudar tenho uma base de dados, quando clico no botão projectos/ações tem vários campos eu queria que o valor aprovado no formulário fosse igual ao somatório do valor aprovado no subformulário, existem várias ações e no campo agregador eu queria que aparecesse a denominação e não o nº.

Outra questão no botão de registo de facturas eu queria colocar um separador para aprovisionamento/património e outro separador contabilidade, a tabela de referência é dados, eu envio uma foto que quando clico em património apareça uns dados e no separador contabilidade outros dados referentes a contabilidade.

Pode-me ajudar por favor. Obrigada

Teresa

Boas teresa.. Vamos por parte...

De mais detalhes do que necessita.

cumprimentos.

Qual form.. e de mais detalhes.

Cumprimentos.

Boas Piloto
É assim são várias coisas que eu preciso mas vamos por partes, no formulário projectos/acções no valor aprovado quero que apareça automaticamente o somatório no subformulário acçao_proj.
No mesmo formulário no campo onde diz agregador eu quero que apareça a palavra e não o nº.
Não sei se me fiz entender.

Cumprimentos

Teresa

Vamos lá...

1 - Crie no SUB_FRM_ACCAO_PROJ (subformulário) uma caixa texto na secção rodapé, nesta caixa texto que será intitulada de: txtSoma, coloque a seguinte espressão:

=Soma([Valor_Aprovado])

2 - no evento após atualizar da caixa texto VALOR_APROVADO, no sub-formulário coloque o seguinte código:

Private Sub VALOR_APROVADO_AfterUpdate()
Me.Parent.VAL_PROJ_APROV = Me.txtSoma
End Sub


Assim ao colocar um ítem no subfrm e aplicar o valor, a caixa texto txtSoma exibirá o total e por sua vez o campo Valor_Aprovado no formulário exibirá tambem este valor.


Cumprimentos.

Valeu está a funcionar. Agora a parte do agregador.
Obrigada

Teresa

Detalhe isto.

Cumprimentos.

O agregador tem dois campos: ID_AGREGADOR e DESC_AGREGADOR, em que este último é o descritivo que pode ser empreitadas, telcomunicações, etc. e o que me aparece no form é o ID e eu queria o DESC.

Vamos la...

1 - A caixa texto ID_Agragador renomeeie para txxAgregador (Desacople-a_)
2 - Cria uma nova caixa texto no form com o nome txtIdAgragador (podes deixá-la oculta)
3 - no envento No Atual do formulário:

Private Sub Form_Current()
Me.txtAgregador = DLookup("Desc_Agregador", "Agreg_Desp", "ID_Agregador = " & Nz(Me.txtIDAgregador, "0") & "")
End Sub


Cumprimentos.

Dá erro

Se os nomes dos objetos estiverem corretos não dará erros..

1 - A caixa texto ID_Agregador, onde exibe o número... desacople-a, ou seja  apague o que tem dentro, assim exibirá a informação "Não Acoplado"
2 - Renomeeie para txtAgregador
3 - Crie uma nova caixa texto, nomeeie de txtIDAgregador, acople-a no campo ID_Agregador, está caixa exibirá o numero (pode deixar em oculto)

e no evento No Atual do form o código que te passei


Veja com calma onde errou.


Cumprimentos.

Ja apaguei e já criei de novo e dá erro no .txtIDAgregador
eu fiz os passinhos todos que me indicou o que será que estou a fazer de errado

Eis apenas o Front End... será necessário voce revincular as tabelas.

https://dl.dropboxusercontent.com/u/26441349/TeresaTexeira.zip


Cumprimentos.

Só mais uma observação, o campo agregador deste formulário tem de ir 'buscar' a informação que é preenchida no formulário projectos, já tenho alguma informação carregada. Me desculpe

Eu entendi da seguinte maneira:

Por exemplo o em Selecione Projeto, selecionei "Empreitada"

No Campo  Agregador apareceu o número 3.... eu deduzi que este número é pertencente  à tabela  AGREG_DESP.... e fiz a instrução baseado nesta tabela...

Se o número 3 for de outra tabela basta modificar o nome da tabela no código:

Me.txtAgregador = DLookup("Desc_Agregador", "Agreg_Desp", "ID_Agregador = " & Nz(Me.txtIDAgregador, "0") & "")


Cumprimentos.

A informação que aparece no formulário projecto/acção vai buscar os dados ao formulário projecto.
Se reparar no formulário projecto por exemplo as centrais telefonicas têm um agregador correspondente a telecomunicações.
Ou seja mediante o que se preenche no form projecto aparecer automaticamente no form projectos/acçoes.
Me desculpe eu aborrecer você
Obrigada

A informaçào que deseja que apareca em agregador está em qual tabela?


cumprimentos.

Está na tabela agregador.
Mas quando eu preencho o formulário projectos quero que me apareça automaticamente em projectos/acçoes

Confesso que não estou a entender...

Cite passo a passo para que eu compreenda...

A informação Agregador = 3 qual o texto teria que aparecer?


Cumprimentos.

Não encontrei tabela com o nome: Agregador.


Cumprimentosl.

Coloque no evento No Atual:

Private Sub Form_Current()
Me.txtAgregador = DLookup("Desc_Agregador", "Agreg_Desp", "ID_Agregador_Desp = " & Nz(Me.txtIDAgregador, "0") & "")
End Sub

Eu havia errado no campo ID_Agregador... acrescentei  _Desp,,

Teste

Cumprimentos.

Bacano é isto mesmo que pretendo. Obrigada pela ajuda.
Ainda tinha mais umas dificuldades neste base dados mas se calhar já é muita coisa.

Boas Teresa... Este tópico está exaurido, pois as dúvidas foram solucionadas....
No fórum utilizamos uma Máxima: Nova Dúvida, Novo Tópico, assim conseguiremos manter a integridade do fórum por assunto.

Clique no resolvido e no joinha da mensagem que o auxiliou.


Cumprimentos.

Ok. Obrigadão pela ajuda.

Cumprimentos

Teresa