Pesquisa em Sub formulario em formulario

Ola amigos,

Preciso fazer uma pesquisa da seguinte forma:


Tenho um formulario com os seguintes campos:

Inscrição, Nome, codigo, descricao, valor

Sub formulario com os seguintes campos:
Codigo, descrição, valor

Gostaria que quando abrisse o formulario ele pesquisasse automaticamente o codigo no sub formulario, retornando as informaçoes correspondente, de acordo com o codigo do formulario, e assim que eu mudasse de resgistro ele buscasse o proximo codigo.


Grato,


Aiv Antonio

Tente:

Me.Campo1 = Forms!SeuSubForm.Form!Campo1
Me.Campo2 = Forms!SeuSubForm.Form!Campo2
Me.Campo3 = Forms!SeuSubForm.Form!Campo3

Teste os eventos "Ao carregar" do form ou "Ao formatar" ou "No atual" e veja as diferenças e veja o qual lhe permite melhor uso.

Ola,


Estou digitando da seguinte forma e não esta dando certo:

Me.cod_cargo = Formulários![N Medio - Correção]![CD_CODCAR]



O cod_cargo esta no sub formulario e CD_CODCAR esta no formulario

e não estou conseguindo fazer com que ele busque o codigo do cargo no subformulario. Só retorna erro.

Grato

Aiv Antonio

Amigo:

Parece-me que existe aí uma má estruturação da BD. Vejamos o simples e o óbvio:

Se a Tabela que alimenta o formulário principal e a tabela que alimenta o sub formulário estiverem ligadas na relação de 1 para muitos,os dados do sub form serão relacionados ao form principal e sempre que mudar de registo os dados relacionados ser-ao mostrados.

DEfina a chave primária no sub form como número apenas, aceda ao modo de relacionamento e arraste a chave da tabela do sub form para a chave da tabela da tabela do form principal. Aparece uma caixa a dizer que o relacionamento é de um para muitos e o problema está resolvido.

Se é para filtrar, não é para alterar...

teste o simples, no VBA do seu formulario, nos dois eventos ao carregar e no atual;

Private Sub Form_Load()
With Me.[SeuSubFormulario].Form
.Filter = "cod_cargo=" & Me.CD_CODCAR.Value
.FilterOn = True
End With
End Sub


Private Sub Form_Current()
With Me.[SeuSubFormulario].Form
.Filter = "cod_cargo=" & Me.CD_CODCAR.Value
.FilterOn = True
End With
End Sub

Ola amigos,

Peço paciencia a todos voces.

O que quero fazer e o seguinte quando carrego o formulario 1: ele aparece os campos Inscrição, Nome, Codigo, descrição.

Exemplo:
Inscrição: 001
Nome: Antonio
Codigo: 013
Descriçao: leite

No sub formulario tenho: Codigo, Descrição e valor



Preciso que quando apareça no formulario 1 o codigo 013 ele mova ou faça a busca no Sub formulario de codigo 001 vá para o 013. Onde terei o valor, Se o Codigo for 014 ele vá para o codigo 014.

Grato,


Aiv Antonio

Suas tabelas se mostram assim, como na imagem abaixo: ??




Se a estrutura for essa, a dica do Vieira é a mais adequada a seguir. Acesse o Menu ferramentas > relacionamento e ligue uma tabela na outra começando do campo [Codigo] da tabela 1 ao outro campo [Codigo] da tabela 2 referente ao seu subformulário.

Obs. Não esqueça que "Valor" é um nome reservado do MSAccess. Portanto, deves renomear o nome "Valor" contido na sua tabela, para que não se depare a problemas na hora de programar.

Efectivamente isso tem Código a mais nessa tabela e um mau relacionamento. Não estou com a bD aqui à frente mas:

Tabela 1 Código chave primária e numeração automática está OK

Tabela 2 Deveria ser Código número apenas e ligado como já referi acima ao código da tabela 1 na relação de 1 para muitos, para isso funcionar direitinho.

Tal como o Dilson já referiu e temos vindo a avisar constantemente, Valor é uma palavra reservada do Access. Por favor não a utilizem.

Vieira,

Como falou deveria estar assim então na BD do Aiv:

Sim Dilson é isso mesmo. Penso que dessa forma e tu concordas comigo, o problema do colega está resolvido. Obrigado.

Ola amigos,


Abaixo segue imagem do que estou querendo fazer, manualmente consigo mas não estou conseguindo fazer de forma automatica.


Bom acho que com a imagem fica mais facil de compreender o que preciso fazer. Pois a informação que passei acima tentei passala de forma resumida.

Ola


Acho que talvez fique mais facil com a imagem complenta segue imagem compactado para melhor compreençao.



Grato,



Aiv Antonio

Creio que não poderemos ajudar somente com essa imagem. Que tal colocar o banco ou só parte dele para análise.

Se não puder disponibilizar, podes então ir no menu ferramentas > Relacionamentos, você verá o organograma de suas tabelas, pode arrumar clicando e puxando com o mouse de forma deixar visível o nome das tabelas e campos (assim como fiz acima) e nos enviar a imagem.

OK,


Hoje a noite mando o bd, vou dar um enxugada nele para dar o tamanho, pois da ultima vez que tentei enviar ficou muito grande e não deu certo.


Ate mais tarde, e grato pela ajuda.



Aiv Antonio