Top demais suas aulas, gostaria de um formulário com listbox que ao selecionar a linha ele retornar os valores para as textbox, porem a listbox com apenas algumas das informações salvas e quando fazer o retorno para textbox retornar direto da tabela as informações completas pelo ID podendo usar para editar, imprimir e excluir. e o botão salvar usar o If Else para definir se ei para incluir novo ou editar registrado. muito grato!
Muito obrigado Thais, seus vídeos são extremamente didáticos e facilitaram o VBA pra um leigo como eu muito rapidamente! Gostaria de perguntar se estou fazendo algo errado, mesmo eu tendo escrito no módulo da mesma forma que foi escrito por você (alterando somente o nome da planilha que utilizei), quando aperto F5 aparece um erro de compilação de "Loop sem Do". Já apaguei e reescrevi tudo inclusive o "Do Until" 5 vezes... De qualquer forma agradeço pelos vídeos, aprendi bastante!
Após efetuar a pesquisa e retornar o resultado na ListBox, é possível selecionar o cliente e ir direto para a posição onde está colocado o cliente na tabela? Obrigado
Vídeo muito bom! Precisava fazer um filtro por botão e que ele separasse em produtos: com estoque acima do estoque mínimo e com estoque abaixo do estoque mínimo, poderia me ajudar?
Muito bom, até apliquei em um desenvolvimento que estou fazendo, porém você utilizou "Ucase" porque na sua tabela todos nomes são maiúsculos, mas e se a tabela conter dados com maiusculas e minusculas? eu tentei excluir o "Ucase" mas ai não funciona. Tem algum comando que pesquise independente de maiusculo ou minusculo? Obrigado
Olá Marcelo O comando Ucase é para padronizar tanto o que está sendo pesquisado, como tambem o resultado. Por exemplo, imaginemos que eu tenha na minha planilha estes dois nomes: 1. Ana 2. ana Sem não usar o padrão ucase ou Lcase, se eu digitar na minha textbox "a", vai trazer o segundo nome e caso digite "A". ele vai trazer o primeiro. ou seja, isso significa que cada caracter o excel o percebe de forma diferente e na hora do filtro aplica todas especificidades possíveis de modo a trazer o resultado exacto. já caso use o comando Lcase ou Ucase que pode ser implementado do seguinte jeito UCase(sheets#.range("A"&Linha)=Ucase(textbox1)) Como esse comendo, na hora de filtrar ele converte todos dados para ucase, ou seja, todos passam a ficar assim: 1. ANA 2. ANA Então indepentimente de como escrever os caracteres, ele vai me retornar os dois resultados. Espero ter ajudao.
Perfeito! É isso mesmo. A função LCase traz os resultados dos caracteres todos em minusculo. A Função Ucase traz os resultados dos caracteres todos em maiusculo. o restante já está super explicado acima!
Amei! Consegui adaptar pra fazer uma busca com vários critérios. Estou aprendendo muito, obrigada! Só não entendi direito o que é entendido quando a gente deixa a condição vazia, poderia explicar melhor? (a linha "if [...] then " sem a condição, indo direto pro else)
Bom, ali no caso se a condição for verdadeira ele vai inserir os dados dentro do listbox (sendo assim ele no executa nenhum codigo em especifico quando a condição é verdadeira) caso for falsa ele vai pular a linha e ir para a proxima. Eu poderia ter usado somente "if not [...] then " e no caso nao usar o else. Existem varias maneiras de fazer a mesma coisa rsrs. No momento aquela foi a que achei mas pratica para demonstrar 😊 Espero que eu tenha sanado sua duvida...Abraços.
@@selfsum o procedimento básico de como habilitar um controle não é o problema, eu e muitos sabemos. O problema é de compatibilidade, e para resolver é de outra forma, você sabe.....
O meu codigo é igual ao seu, so que quando eu clico em algum registro filtrado ele carrega nos respectivos textbox para fazer alguma alteração e quando clico em um botão ele grava em cima de outra linha. Por exemplo, fiz uma pesquisa e o registro que quero alterar esta na segunda linha. Quando eu clicar no botão ele vai alterar a segunda linha da tabela e não a linha onde ele se encontra. Poderia me ajudar?
Me ajudem por favor. A minha tabela tem mais de 10 colunas e esse codigo é para no maximo 10. Quando vou executar, ele da erro 380. Como corrigir esse erro e permitir fazer a filtragem?
Olá, fiz tude conforme o seu video (copiei todo o código com print screens e confirmei várias vezes todas as linhas, fiz o formulário igual a e tabela excel - tudo igualzinho ao seu video) mas quando corro a aplicação o vba retorna a seguinte mensagem de erro: Compile error: Method or data member not found e a linha " .Addltem home.Cells(Linha, 1)" fica destacada a azul.
Porquê será que meu campo Cliente só está filtrando a primeira letra, se digito a segunda em diante meu listbox fica vazio? Ex se tenho os nomes José Henrique e José Manuel, qdo filtro por J aparecem ambos, se digito o JO já desaparece tudo, não consigo filtrar por José Manuel por exemplo.
Aula boa, mais parei de assistir, a fonte muito pequena , não dá pra enxergar, pra quem já entende um pouco d VBA é fácil, pra quem esta iniciando é praticamente impossível, poderia deixar a planilha para download, ou aumentar a fonte ou deixar o código abaixo ex: nesse canal ruclips.net/video/AVpR9jDhgnU/видео.html
O correto seria 'Asteristico'. Depois do ponto final, devemos sempre iniciar a próxima palavra com letra maiúscula. Apesar de que, na frase que escreveu, não haver necessidade do ponto final.
EXCELENTE AULA!
ESTAVA EXTREMAMENTE PRECISANDOD ELA!
MUITO OBRIGADO POR COMPARTILHAR O SEU CONHECIMENTO.
DEUS CONTINUE A ABENÇOANDO!
Muito bom, obrigado, aprendi mais uma forma de traser os dados para a listbox.
Ótíma explicação show!
Parabéns Thais. Muito boa sua didática.
Muito obrigada 😃
Te admiro muito na explanação dos códigos, de forma simples e objetiva. Parabéns.
Excelente, parabéns
Seus vídeos são ótimos.
Muito obrigada @erick, deixe aqui nos comentários o que mais você quer aprender
Top demais suas aulas, gostaria de um formulário com listbox que ao selecionar a linha ele retornar os valores para as textbox, porem a listbox com apenas algumas das informações salvas e quando fazer o retorno para textbox retornar direto da tabela as informações completas pelo ID podendo usar para editar, imprimir e excluir. e o botão salvar usar o If Else para definir se ei para incluir novo ou editar registrado. muito grato!
Show de bola !!
Obrigada 🤙
Muito bom! Parabéns!
+1 inscrito!
Excelente, Obrigado.
Muito bem explicado.
Se eu pudesse, daria vários likes, pois seus vídeos são os melhores sobre o assunto. Obrigado por compartilhar seu conhecimento!
Muito obrigado Thais, seus vídeos são extremamente didáticos e facilitaram o VBA pra um leigo como eu muito rapidamente! Gostaria de perguntar se estou fazendo algo errado, mesmo eu tendo escrito no módulo da mesma forma que foi escrito por você (alterando somente o nome da planilha que utilizei), quando aperto F5 aparece um erro de compilação de "Loop sem Do". Já apaguei e reescrevi tudo inclusive o "Do Until" 5 vezes... De qualquer forma agradeço pelos vídeos, aprendi bastante!
Comigo acontece a mesma coisa... Conseguiu resolver?
Veja se colocou o End If após o GoTo Proxima Linha. Acontece isso quando não se fecha um If.
Parabéns, muito bem explicado. Mas, vc poderia explicar como pesquisar por nome e por data ao mesmo tempo? obrigado!
muito bom!!!
🤝
Existe um codigo de filtragem para números como cnpj ou inscrição estadual q funcione como este codigo para nomes?
Após efetuar a pesquisa e retornar o resultado na ListBox, é possível selecionar o cliente e ir direto para a posição onde está colocado o cliente na tabela? Obrigado
Vídeo muito bom! Precisava fazer um filtro por botão e que ele separasse em produtos: com estoque acima do estoque mínimo e com estoque abaixo do estoque mínimo, poderia me ajudar?
Muito bom, até apliquei em um desenvolvimento que estou fazendo, porém você utilizou "Ucase" porque na sua tabela todos nomes são maiúsculos, mas e se a tabela conter dados com maiusculas e minusculas? eu tentei excluir o "Ucase" mas ai não funciona. Tem algum comando que pesquise independente de maiusculo ou minusculo? Obrigado
Olá Marcelo
O comando Ucase é para padronizar tanto o que está sendo pesquisado, como tambem o resultado.
Por exemplo, imaginemos que eu tenha na minha planilha estes dois nomes:
1. Ana
2. ana
Sem não usar o padrão ucase ou Lcase, se eu digitar na minha textbox "a", vai trazer o segundo nome e caso digite "A". ele vai trazer o primeiro. ou seja, isso significa que cada caracter o excel o percebe de forma diferente e na hora do filtro aplica todas especificidades possíveis de modo a trazer o resultado exacto.
já caso use o comando Lcase ou Ucase que pode ser implementado do seguinte jeito
UCase(sheets#.range("A"&Linha)=Ucase(textbox1))
Como esse comendo, na hora de filtrar ele converte todos dados para ucase, ou seja, todos passam a ficar assim:
1. ANA
2. ANA
Então indepentimente de como escrever os caracteres, ele vai me retornar os dois resultados.
Espero ter ajudao.
@@WebTechmoz Obrigado pelo tempo explicando, ficou claro e objetivo.
Perfeito! É isso mesmo.
A função LCase traz os resultados dos caracteres todos em minusculo.
A Função Ucase traz os resultados dos caracteres todos em maiusculo.
o restante já está super explicado acima!
Amei! Consegui adaptar pra fazer uma busca com vários critérios. Estou aprendendo muito, obrigada! Só não entendi direito o que é entendido quando a gente deixa a condição vazia, poderia explicar melhor? (a linha "if [...] then " sem a condição, indo direto pro else)
Bom, ali no caso se a condição for verdadeira ele vai inserir os dados dentro do listbox (sendo assim ele no executa nenhum codigo em especifico quando a condição é verdadeira) caso for falsa ele vai pular a linha e ir para a proxima.
Eu poderia ter usado somente "if not [...] then " e no caso nao usar o else.
Existem varias maneiras de fazer a mesma coisa rsrs. No momento aquela foi a que achei mas pratica para demonstrar 😊
Espero que eu tenha sanado sua duvida...Abraços.
O ListView está disponível nas versões mais recentes do Exvel???
O Controle ListView precisa ser habilitado na caixxa de ferramentas.
@@selfsum aqui é que está o problema, ele e outros não aparecem na caixa de ferramentas....
@@ofi2701 abre a caixa de ferramentas e clica com o botão direito em adicionar controle e procure por listview
@@selfsum o procedimento básico de como habilitar um controle não é o problema, eu e muitos sabemos. O problema é de compatibilidade, e para resolver é de outra forma, você sabe.....
O meu codigo é igual ao seu, so que quando eu clico em algum registro filtrado ele carrega nos respectivos textbox para fazer alguma alteração e quando clico em um botão ele grava em cima de outra linha. Por exemplo, fiz uma pesquisa e o registro que quero alterar esta na segunda linha. Quando eu clicar no botão ele vai alterar a segunda linha da tabela e não a linha onde ele se encontra. Poderia me ajudar?
show
Me ajudem por favor. A minha tabela tem mais de 10 colunas e esse codigo é para no maximo 10. Quando vou executar, ele da erro 380. Como corrigir esse erro e permitir fazer a filtragem?
Boa noite como eu faço para colocar neste codigo outra caixa de filtro?
Vídeo excelente, mas como seria se fosse uma tabela dentro da planilha, igual no meu caso?
Muito bom! Só não encontrei o código do botão para filtrar entre as datas de agendamento.
como adicionar a foto ao clicar no registro no listbox e botão pesquisa para encontrar cliente
#gostei.
Olá, fiz tude conforme o seu video (copiei todo o código com print screens e confirmei várias vezes todas as linhas, fiz o formulário igual a e tabela excel - tudo igualzinho ao seu video) mas quando corro a aplicação o vba retorna a seguinte mensagem de erro: Compile error: Method or data member not found e a linha " .Addltem home.Cells(Linha, 1)" fica destacada a azul.
Oá amigo, Home é o nome da aba de excel dela, você esta usando Planilha1?
Porquê será que meu campo Cliente só está filtrando a primeira letra, se digito a segunda em diante meu listbox fica vazio? Ex se tenho os nomes José Henrique e José Manuel, qdo filtro por J aparecem ambos, se digito o JO já desaparece tudo, não consigo filtrar por José Manuel por exemplo.
Mas quando começar a pesquisar ele também vai carregar os registro e imagem do cliente
sim, é possivel.
Fiz tudo igualzinho e aparece erro Loop Sem Do... Como posso resolver?
Faltou inserir o end If após o evento
"Goto proximalinha"
Ficaria
Else
Goto proximalinha
End If
End if
♥♥♥
o meu esta dando erro permisao negada
tirando o asteristico... kkkkk parabéns gata !
Copiei certinho, e dá "Loop sem Do", sendo que o Do Until está presente no código
provavelmente voce esqueceu de fechar algum if dentro do loop.
Descupa pessoal. Já encontrei o erro. Tudo a funcionar 5 *
Será possivel editar um registro após a seleção
Aula boa, mais parei de assistir, a fonte muito pequena , não dá pra enxergar, pra quem já entende um pouco d VBA é fácil, pra quem esta iniciando é praticamente impossível, poderia deixar a planilha para download, ou aumentar a fonte ou deixar o código abaixo ex: nesse canal ruclips.net/video/AVpR9jDhgnU/видео.html
Na descrição do vídeo tem o link do blog onde tem os códigos descritos la 😊
@@thaispporfirio Muito obrigado Thais, vou assistir e compartilhar
@@thaispporfirioNão consegui, obrigado
ASTERISCO por favor. asteristico não existe.
haha mas foi só no erro de português que tu prestou atenção?!! 😁😁
O correto seria 'Asteristico'. Depois do ponto final, devemos sempre iniciar a próxima palavra com letra maiúscula. Apesar de que, na frase que escreveu, não haver necessidade do ponto final.