Excel planilha vba busca palavra com inputbox

Dom, 12 de Fevereiro de 2012 16:12 Expedito Marcondes
Imprimir

 Escola Saberexcel VBA Estudos® - Treinamento com Macros, Fórmulas e Funções

Essa macro do aplicativo Microsoft Excel VBA(Visual Basic Application) com o auxilio de uma entrada de dados (inputBox) localiza determinada palavra,
seleciona a célula e retorna o endereço da célula encontrada>
Espero que o exemplo possam lhe ser útil. fique com Deus. Expedito Marcondes

Sub Localiza_palavra_desejada()
sbx = InputBox("Procurar palavra desejada", "Escola Saberexcel VBA Estudos", "Busca_personalizada")
If sbx = cancel Then 'caso cancele a busca
   Exit Sub
End If

      Cells.Find(What:=sbx, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Select
      MsgBox "Palavra [ " & sbx & " ] encontrada na célula [ " & ActiveCell.Address & " ]", vbInformation, "Escola Saberexcel VBA Estudos"
     
End Sub




Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.



   Baixe o exemplo de planilha contendo o macro acima
Excel planilha vba busca palavra com inputbox (21.46 KB)

Tags:
Última atualização em Dom, 12 de Fevereiro de 2012 16:29