Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Macro procurar
 
Notifications
Clear all

Macro procurar

 
2024 - VBA & Macros
Post Recente por P@tropi 5 anos atrás
3 Posts
3 Usuários
0 Reactions
1,391 Visualizações
RSS
 Raike
(@raike)
Posts: 0
New Member
Topic starter
 

Pessoal preciso de uma ajuda simples com a macro abaixo, aonde esta escrito "CARLOS" eu precisava que ela entendesse qualquer terxo que estivesse digitado na celula G8 Plan1 para assim pesquisar na planilha "Férias" e não como ficou gravado com o nome que estava atualmente

Sub Macro8()
'
' Macro8 Macro
'
    Range("G8").Select
    Selection.Copy
    Sheets("FÉRIAS").Select
    Range("A6").Select
    Cells.Find(What:="CARLOS", After:=ActiveCell, LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False, SearchFormat:=False).Activate
End Sub
 
Postado : 31/10/2019 7:58 am
 srobles
(@srobles)
Posts: 0
New Member
 

Raike,

Experimente :

Sub Macro8()
Dim valorPesquisado As String

valorPesquisado= Range("G8")

Sheets("FÉRIAS").Select
Range("A6").Select
Cells.Find(What:=valorPesquisado, After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False).Activate
End Sub

Ou teste o modelo do link : https://www.sendspace.com/file/y9fakf

 
Postado : 02/11/2019 4:12 pm
 P@tropi
(@ptropi)
Posts: 0
New Member
 

Movi teu tópico para a sala correta pois a dúvida é sobre VBA e estava postado na sala de formulas e funções.

Quando postar códigos VBA utilize a ferramenta CODE.

Favor ler as regras do fórum.

[]s
Adalberto - Moderador

 
Postado : 04/11/2019 2:36 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico