[Resolvido]Como Seleccionar registo ao pesquisar cliente e abrir formulario

Boa noite,

Já procurei vários topicos mas não consegui aplicar as soluções no meu problema.

TEnho uma tabela (ListadeClientes) que tem um campo (NomeCand) e tenho um formulário (formulario) no qual insiro os dados dos clientes em lista de espera.

mas gostava que existe no mesmo formulario um campo talvez textbox em que ao inserir letras/palavras me fosse filtrar os nomes dos clientes até eu poder seleccionar um e ir para o formulario correspondente ao do registo.

O problema é que nao sei nada de vba e tentei aplicar vários exemplos, desde combobox a listbox mas não consegui.

Alguem que me possa ajudar, por favor?

OBrigada

Boa noite, Leila.

Existem várias maneiras de fazer isso. Pelo que entendi você quer aplicar um filtro numa caixa de combinação para preencher os dados das pessoas cadastradas. Se for isso, veja esse exemplo, simples, que fiz e tente adapta-lo para o seu Banco de Dados.

https://www.dropbox.com/s/y5cfdawhvifloh7/ExemploDeCaixaDeCombina%C3%A7%C3%A3o2003.mdb?dl=0

Um abraço


Walter

ola!

eu so vi a tabela com 4 registos....

nao tinha mais na base de dados?

nao vi caixa nenhuma

desculpe nao abri o restante!

vou dar uma olhadela ok?

obrigada

obrigada!

vou testar!

depois dou retorno ok?

obrgada

Opa! Desculpe. Enviei o arquivo errado. Veja agora. Abra o formulario.

https://www.dropbox.com/s/rivr6ttvmo7ackw/ExemploDeCaixaDeCombina%C3%A7%C3%A3o.accdb?dl=0


Walter

ola!

então aconteceu o seguinte erro:

run-time error "2465" o lista de espera - estrutura residencial não consegue loxalizar o campo "Combinação194" referenciado na expressão,

ora o que alterei baseada no seu form foi:

O seu:

Private Sub Combinação24_AfterUpdate()
DoCmd.ApplyFilter , "CódigoCliente=" & Me!Combinação24.Column(0)

Me!NomeCliente.SetFocus
Me!Combinação24 = Null

O meu:

End Sub

Private Sub CaixaCombinação194_AfterUpdate()
DoCmd.ApplyFilter , "NomeCand=" & Me!Combinação194.Column(0)

Me!NomeCliente.SetFocus
Me!Combinação194 = Null


End Sub

Modifiquei o nome da caixa de combinação e o campo que no meu caso é NomeCand

não consigo perceber o erro...

Tente assim: (Veja, Leila, que alterei algumas coisas no código - em azul)

Private Sub CaixaCombinação194_AfterUpdate()
DoCmd.ApplyFilter , "NomeCand=" & Me!CaixaCombinação194.Column(0)

Me!NomeCand.SetFocus
Me!CaixaCombinação194 = Null


End Sub

ola!

Resultou quase na perfeição, mas ainda dá erro. Ele localiza mas quando faço enter acontece isto

erro 438: object doesn´t support this property or method

fui ver o codigo e vi isto em amarelo

Private Sub CaixaCombinação194_AfterUpdate()
DoCmd.ApplyFilter , "ID=" & Me!CaixaCombinação194.Column(0)

Me!NomeCand.SetFocus
Me!CaixaCombinação194 = Null


o que será?

ESTÀ QUASE!!

Não sei porque o Access não está aceitando o SetFocus, mas tente excluir essa linha do código e teste novamente.

Mudei o campo para o campo a sguir no formulario e funcionou!!


ALEGRIA! andava á imenso tempo a procura !!!!!

OBrigada, muito obrigada!!!!

Será que me pode tirar outra duvida?

gostava de numerar os registos dos clientes em lista de espera que tem uma classificação ou seja quando maior a classificação mais perto estarão no top da lista de espera, mas antevejo um problema é que há pessoas com a mesma classificaçao... o access já distingue através do sexo (não fui eu que fiz esta distinção) ... Será que me pode ajudar??

Desde Já muito obrigada!!!!

GRATA

Esse formulario que mostra a lista é baseado em uma consulta? Se for é simples: basta abrir a consulta e na coluna onde tem a classificação ordena-la como Decrescente...

Walter

Mas.... Se voce quer que os nomes NA CAIXACOMBINAÇÃO194 apareçam em ordem decrescente, abra a consulta da caixacombinação clicando duas vezes sobre os 3 pontinhos na Origem da Linha (Aba: Dados) e modifique-a. Cuidado!!! Convem fazer uma cópia do BD antes....

bom dia!

Fiz o que disse e realmente ordenou a caixa de combinação que era o que me interessava... ainda nao tinha visto esse bug...

Reparou na outra duvida que lhe pedi para esclarecer sobre numeração dos registos nos relatorios por ordem de classificação?

obrigada

Leila.
Essa listagem que você tem é em um Relatório?
Se for basta voce colocar uma Caixa de Texto na frente do item que quer numerar. Nas propriedades desse campo, na aba Dados, coloque em Fonte do Controle: =1 e em Soma Parcial troque "Não" por "Por Grupo". E teste. Deve dar certo.
Se for em um Formulario é mais complexo....

Walter

sim é num relatório
e funcionou porque o relatorio já tem por ordem descendente a classificação,

mas tenho outro relatorio em que se ve os ultimos dados inseridos. Gostava de numerar esses registos conforme a ponderação que já tem por exeplo.

classificação ------       data   ------      ponderação
     3     ------       05-01-2015   ------       30
     2     ------      04-01-2015     -------     40
     10    ------      01-01-2015    ------      15

(entre o 2º e 3º classificado existem de certeza clientes com ponderação entre 15 e 40 mas que são mais antigos...

também é num relatório...


pode ajudar-me mais uma vez?

O Relatório é baseado em uma Consulta. Certo? Qual estrutura dessa consulta? Tem uma coluna Ponderação?

é baseado numa consulta... envio em anexo print da consulta.

tem coluna de ponderação

Boa tarde, Leila.

Pelo que vi, na Consulta não tem um Campo "Ponderação", portanto ele deve ser um "Campo Calculado" no Formulario, ou seja, a fórmula que calcula a ponderação está no próprio formulário. Se for isso, não sei se dá para colocar em ordem Crescente ou Decrescente. Sugiro colocar o Campo calculado, com a formula, na Consulta e ordena-lo como decrescente. Aí sim poderá inseri-lo no formulario.

Apenas para efeito de organização do forum sugiro que você feche esse tópico, clicando em resolvido, pois o tema inicial do mesmo, "Selecionar registro ao pesquisar" já foi resolvido (certo?) e abra novo tópico na Sala Formularios perguntando se alguem sabe como ordem um campo calculado no Form. Talvez uma pesquisa no forum encontre alguma sugestão/solução que se aplique a seu caso.
Ou, se quiser seguir minha sugestão de incluir o campo calculado na consulta, que é a solução que uso, pesquise sobre isso, se não conseguir abra um Tópico novo na sala Consultas, que poderemos ajudar-te a faze-lo. Ok? Os membros desse Forum estão sempre dispostos a ajudar uns aos outros...

Um abraço

Walter

boa tarde,

já coloquei em outro topico,

mas vou tentar a sua ajuda...


Muito obrigada, por tudo!!

como coloco como resolvido?

Lá embaixo, acima dos botoes Pre-visualizar e Enviar tem um botao RESOLVIDO.

ola!

obrigada!

testei o que me disse mas não funcionou....


já abri tópico, se me quiser ajudar, agradeço, ainda ninguém respondeu!

Obrigada

mais uma vez obrigada!