Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Conectar-se  

Compartilhe | 
 

 Localizar artigos com uma macro

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
nestorjmpr



Mensagens : 1
Data de inscrição : 16/01/2017

MensagemAssunto: Localizar artigos com uma macro   Seg Jan 16, 2017 1:11 pm

Boas pessoal,

Precisava de uma ajuda, tenho uma listagem de vernizes que numa coluna A:B tenho os códigos dos vernizes e numa outra C:D as descrições. Criei uma macro que me permite localizar os códigos na listagem, mas apenas se eu colocar o código tal como ele é. Ou seja se eu tiver o código "20090010" tenho que digitar na procura "20090010" caso contrário não encontra nada. O que eu necessito é que na procura pudesse colocar "900..." e ele procurava-me todos os "900..." que existissem. Ou nas descrições, colocar na procura "OPP..." e a macro procurar todos os "OPP...".

O código VBA que tenho é este:

Sub Botão1_Clique()
Dim EncontraString As String
Dim Rng As Range
EncontraString = InputBox("Informe o valor a procurar")
If Trim(EncontraString) <> "" Then
With Sheets("Sheet1").Range("A:B")
Set Rng = .Find(What:=EncontraString, _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
If Not Rng Is Nothing Then
Application.Goto Rng, True
Else
MsgBox "Não encontrado"
End If
End With
End If
End Sub


Agradeço desde já a ajuda possivel.
Voltar ao Topo Ir em baixo
Ver perfil do usuário
 
Localizar artigos com uma macro
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Macro que permita localizar e substituir valores
» Criar macro para abrir o registro no Form Referente
» [TUTORIAL] Adicionar sombra no quadro dos artigos
» Questão: artigos para venda
» [Resolvido] Últimos artigos

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: