Jump to content
Fórum Script Brasil
  • 0

Seleção Por Meio De "contém"


Guest - Rafael -

Question

Guest - Rafael -

Olá,

Preciso de uma ajuda para montar um código em VBA q encontre as células não pelo seu conteúdo completo, mas sim "parte" dele.

a função SE (IF) pega apenas dados concretos, ou seja, se o valor da célula É ou NÃO É o que eu estou procurando.

o que eu preciso é q o código selecine determinada célula APENAS pelo fato dela conter o que procuro, exemplo:

selecionar a célula q contenha o número 1:

as células selecionadas poderiam ter qqer um desses valores:

1234

565412456

brasil1pais

1etc

só por conter o caractere "1" na célula, a mesma já é selecionada.

essa regra não se aplica apenas a numeros não, Ok? pode ser qqer caractere...o "1" foi adotado apenas como exemplo.

desde já...agradeço pelo help!!

Abraços

Link to comment
Share on other sites

1 answer to this question

Recommended Posts

  • 0
Olá,

Preciso de uma ajuda para montar um código em VBA q encontre as células não pelo seu conteúdo completo, mas sim "parte" dele.

a função SE (IF) pega apenas dados concretos, ou seja, se o valor da célula É ou NÃO É o que eu estou procurando.

o que eu preciso é q o código selecine determinada célula APENAS pelo fato dela conter o que procuro, exemplo:

selecionar a célula q contenha o número 1:

as células selecionadas poderiam ter qqer um desses valores:

1234

565412456

brasil1pais

1etc

só por conter o caractere "1" na célula, a mesma já é selecionada.

essa regra não se aplica apenas a numeros não, Ok? pode ser qqer caractere...o "1" foi adotado apenas como exemplo.

desde já...agradeço pelo help!!

Abraços

Olá Rafael, coloque esse código e mande executar

Sub lis()

Dim valor As String

valor = InputBox("Digite o valor desejado")

Cells.Find(What:=valor, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _

xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) _

.Activate

End Sub

Qualquer coisa retorne

Abs

Lisandro Oliveira

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      651.8k
×
×
  • Create New...