VBA-Realização de B...
 
Notifications
Clear all

VBA-Realização de Busca e localização em toda Planilha

10 Posts
2 Usuários
0 Reactions
1,002 Visualizações
(@ewerton150)
Posts: 11
Active Member
Topic starter
 

Bom dia
Sou novo em VBA e estou tentando fazer um códigoque realiza busca em toda a planilha do mesmo, porem não to conseguindo, só consigo fazer que a busca aparece em uma coluna em especifica, gostaria de adicionar talvez as colunas 1 e 2 ou então em toda a planilha, outra questão se faz na própria busca, inclui um textbox, porem o mesmo só permite fazer a busca de texto desde o inicio exemplo um texto: "Correção do Windows" só da pra procurar se eu começar a busca por correção, onde gostaria de começar por windows e já selecionasse o dado
Envio minha planilha para que verifiquem
Ficarei grato com a correção da mesma

 
Postado : 05/03/2014 11:30 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Veja se te ajuda
viewtopic.php?f=21&t=3957

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/03/2014 5:02 pm
(@ewerton150)
Posts: 11
Active Member
Topic starter
 

Boa noite!!

Veja se te ajuda
viewtopic.php?f=21&t=3957

Att

Infelismente ainda não consegui mesmo inserindo o código

 
Postado : 06/03/2014 4:14 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!
Para entrar no Editor VBE (Alt + F11), para inserir um módulo (Alt + I + M)

Veja na página 33.
http://www.bertolo.pro.br/FinEst/Semana ... oExcel.pdf

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 06/03/2014 2:19 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

ewerton150, achei um pouco confusa sua explicação, mas de uma olhada na adaptação que fiz e diga se estamos no caminho certo.
Observe que refiz toda a rotina de preenchimento do listbox, conservei as suas(só desabilitei).

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 06/03/2014 7:36 pm
(@ewerton150)
Posts: 11
Active Member
Topic starter
 

ewerton150, achei um pouco confusa sua explicação, mas de uma olhada na adaptação que fiz e diga se estamos no caminho certo.
Observe que refiz toda a rotina de preenchimento do listbox, conservei as suas(só desabilitei).

[]s

Boa Tarde Mauro,
Muito Obrigado era exatamente o que eu queria,
Só tem mais uma questão, é que no momento em que eu coloco alguma informação no campo buscar template que não tem no campo e quando eu clico em buscar template o código me apresenta o erro em anexo. Gostaria que apresentasse alguma mensagem como "insira um template valido", tentei incluir um msgbox no erro mas a mensagem de "insira um template valido" aparece tanto se tem como se não tem template. Gostaria que a mensagem aparecesse somente se não tivesse nenhum template, Tem como fazer isso por favor?

 
Postado : 07/03/2014 2:15 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

ewerton, vamos por parte:
Se o campo que está se referindo a "buscar template" for o "TextBox1", a rotina referente a este campo faz a pesquisa conforme vai se digitando e vai preenchendo o ListBox, o que podemos fazer é colocar um limitador para que apos as digitações não for mais localizado nenhum dado emitir uma mensagem de item não existente e retornar ao inicio preenchendo novamente o listbox com todos os dados.

Agora, quanto a "quando eu clico em buscar template", não localizei nenhum Botão com esta descrição, o que vi é que o "CommandButton3" com a descrição "Abrir Template" faz a Busca referente a algum dos itens Selecionado no ListBox, ou seja se ele for acionado e não tiver nenhum item selecionado no ListBox dará a mensagem de erro, se for isto, este botão não poderá estrar habilitado se o resultado no Listbox estiver vazio.

Aguardo detalhes.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 07/03/2014 5:39 pm
(@ewerton150)
Posts: 11
Active Member
Topic starter
 

Exatamente o botão"Abrir Template" é que quando eu clico nele e tenho inserido alguma informação que no "TextBox1" que não aparece no listbox é que me apresenta essa mensagem de erro, como posso fazer então para desabilitar esse botão se o listbox for vazio e ou colocar um limitador no "Textbox" ?

 
Postado : 08/03/2014 6:54 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

ewerton, faça os testes.

Qualquer duvida retorne.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 09/03/2014 9:28 am
(@ewerton150)
Posts: 11
Active Member
Topic starter
 

Obrigado Mauro era isso mesmo que queria

 
Postado : 09/03/2014 11:46 am