Usuário com melhor resposta
Botão de pesquisa no excel

Pergunta
-
Olá
Sou novo em programação, e gostaria de saber qual linha de comando uso para fazer uma pesquisa dentro de minha planilha, exemplo: eu dou um clique no botão pesquisar e ele abre uma textbox onde coloco uma informação do que preciso pesquisar.
Desde já agradeço a atenção.
Obrigado.
Respostas
-
Olá,
Code SnippetSet x = Worksheets(1).Cells.Find(what:=textbox1)
If textbox1.Text = "" Then Exit Sub
If Not x Is Nothing Then
x.Select
MsgBox "Texto encontrado na célula " & x.Address & Chr(10) & "Texto:" & x.Text
Else
MsgBox "Texto não encontrado"
End If- Sugerido como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:41
- Marcado como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:41
Todas as Respostas
-
Olá,
Code SnippetSet x = Worksheets(1).Cells.Find(what:=textbox1)
If textbox1.Text = "" Then Exit Sub
If Not x Is Nothing Then
x.Select
MsgBox "Texto encontrado na célula " & x.Address & Chr(10) & "Texto:" & x.Text
Else
MsgBox "Texto não encontrado"
End If- Sugerido como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:41
- Marcado como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:41
-
Olá,
Code SnippetSet x = Worksheets(1).Cells.Find(what:=textbox1)
If textbox1.Text = "" Then Exit Sub
If Not x Is Nothing Then
x.Select
MsgBox "Texto encontrado na célula " & x.Address & Chr(10) & "Texto:" & x.Text
Else
MsgBox "Texto não encontrado"
End IfOlá,
Me interessei pelo codigo mas não tenho noção nenhuma de como aplica-lo, ja criei um botão na planilha mas como aplicar?