Excel macro para abrir a janela "localizar/substituir"

[André Costa TI]

Bom dia.

 

Preciso de uma macro em que eu pressiono o botão e ele dá o comando "Ctrl+F"(Find - meu pc está em inglês)  Simplificando. eu tenho um botao, em que eu pressiono e este seleciona uma coluna e abre a janela "Find".

 

Tem como fazer isto?

[Visitante]

Olá, André.

Veja se é isso.

Sub MostraCaixaLocalizar()
 Application.Dialogs(xlDialogFormulaFind).Show
End Sub

 

[André Costa TI]

Isso mesmo Osvaldo! Obrigado! Ajudou muito!!!!!  No meu trabalho eu estava me lascando pra fazer isso, agora ficou muito mais fácil!

Mas ainda estou com um probleminha. Quando seleciono a coluna e pressiono Ctrl+F ele abre uma janela (imagem abaixo) pois só quero que o Excel pesquise o valor na coluna que selecionei, e nessa macro ele pesquisa em toda a planilha.. Será que ao invés de aparecer a janela FIND aparecer a janela Find and Replace?

[CasaDoHardware]

E so trocar na macro onde esta find por replace..

[André Costa TI]

Não...  eu quero que abra aquela janelinha que postei no post anterior e não esta

[CasaDoHardware]

Como eu disse

Sub MostraCaixasubstituir()

Application.Dialogs(xlDialogFormulaReplace).Show

End Sub

 

Ou seja 

 

Trocar find por replace

[André Costa TI]

Não era bem isso que eu precisava rs.. veja bem.. preciso que apareça essa janela (que está escrito "Find and Replace") e não a que está escrito apenas "Find". Pois as duas tem "funções" distintas. a Find and Replace procura os valores apenas na área selecionada, e já a Find procura em toda a planilha. Preciso para o meu trabalho... Se puderem ajudar...