Busca Palavra – Excel VBA

Busca palavra nas celulas das folhas de planilhas usando excel vba.

menos de 1 minuto ‘esta macro retorna a palavra subsequente à procura ‘ex: Banana retorna a palavra “açucar” Sub Array_retorna_palavra() procurar = “Banana” vbax = Switch(procurar = “Banana”, “açucar”, procurar = “Martelo”, “prego”, procurar = “Chapeu”, “numero”) MsgBox vbax End Sub