none
Botão de pesquisa no excel RRS feed

  • 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.

    segunda-feira, 28 de abril de 2008 17:51

Respostas

  • Olá,

    Code Snippet

    Set 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

     

     

    Qualquer dúvida post denovo..
    segunda-feira, 28 de abril de 2008 18:02

Todas as Respostas

  • Olá,

    Code Snippet

    Set 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

     

     

    Qualquer dúvida post denovo..
    segunda-feira, 28 de abril de 2008 18:02
  • Olá,

     

    Code Snippet

    Set 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

     

     

     

    Qualquer dúvida post denovo..

    Olá,

    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?

    sexta-feira, 21 de maio de 2010 01:18