anterior
Tweet about this on TwitterPin on PinterestShare on LinkedInShare on Google+Email this to someoneShare on Facebook
QR CODE

Pesquisa avançada em Access

capa_pesquisa

Fala pessoal, tudo bem?

Hoje vou mostrar como criar uma consulta avançada em Microsoft Access com a utilização de VBA (Visual Basic for Application).

Bom para começar devemos ter uma tabela que servirá como base para nosso projeto, vamos criar uma tabela de produtos contendo os seguintes campos:

Tabela de Produtos

Nome do Campo

Tipos de Dados

Propriedade do Campo

Cd_produto Numeração Automática Chave Primária
Descrição Texto Tamanho: 255
Und Texto Tamanho: 3
Preco Moeda
Prod_ativo Sim/Não

img1

Após a criação, salve a tabela com o nome de tb_produtos, aproveite para registrar algumas informações em sua tabela, criei seis produtos para exemplo.

img2

Agora vamos criar um formulário para nossa tabela, para isso vamos criar no modo design de formulário, para começar utilizando os controles desenhe uma caixa de listagem em seu formulário.

img3

Assim que você inserir a caixa de listagem será aberto um assistente para selecionar os dados a serem exibidos na caixa de listagem.

img4

Deixe marcada a opção padrão que é a primeira e clique em Avançar, na tela seguinte selecione a tabela de produtos e avance.

img5

Na tela seguinte selecione todos os campos e clique em avançar.

img6

Na tela seguinte podemos selecionar como desejamos ordenar nossos produtos, neste exemplo vou utilizar a opção cd_produto.

img7

Na tela seguinte será possível visualizar os dados já cadastrados na tabela de produtos.

img8

Conclua a seleção dos dados e em seguida altere a propriedade cabeçalhos das colunas para sim.

img9

Agora vamos inserir uma caixa de texto logo acima da caixa de listagem, que fará a pesquisa do produto ou seja o local onde faremos a entrada de dados.

img10

Vá em propriedades e altere o nome da caixa de nome para txtProduto, salve o formulário com o nome frm_produtos.

img11

Selecione a caixa de listagem, e na propriedade da guia dados em Origem da Linha clique no botão reticências.

Na tela que será aberta no campo descrição em critérios digite a seguinte linha de comando:

Como [Forms]![frm_produtos].[txtProduto] & “*”

Após ter digitado a linha acima pode fechar a consulta caso seja necessário pode salvá-la.

Agora selecione a caixa de texto de pesquisa e nas propriedades na guia evento vamos mudar o evento ao alterar utilizando o construtor de códigos.

img12

Ao fazer isso o editor do VBA será iniciado, digitando o código me.Realc já será possível fazer a filtragem da informação por letra.

img13

Agora conforme você digita o nome do produto o formulário vai realizando o filtro da informação.

img14

Bom pessoal, finalizamos aqui mais um tutorial, espero que gostem do POST e não esqueçam de enviar seus comentários no fim da página.

Até o Próximo POST.

Próximo

Postado por

Meu nome é André Santos, ministro aulas de Informática, Web e Hardware na Microcamp de Praia Grande, atuo na área há diversos anos e continuo meus estudos incessantes todos os dias afinal de contas a informática está sempre mudando e temos uma novidade a todo instante. “Trabalhar enriquece a mente”!

Postagem Relacionada

Testando Comandos SQL sem servidor instalado
Salve galera, hoje vou ensinar como testar comandos SQL sem ter que instalar nenhum servidor,