Este fórum está sendo desativado

[wpceid]

Boa tarde amigos!

Estou com um problema, eu gostaria de quando uma pessoa escrever, por exemplo, OI numa célula, o valor seja automaticamente trocado por TCHAU.

Eu tenho um banco de dados com as palavras originais e as palavras a serem substituídas.

Obrigada!

[FelipeMGarcia]

Na mesma célula não dá, mas dá pra fazer em uma célula ao lado, se for na mesma célula, pode ser que consiga via VBA, mas não manjo.

[alexandrevba]

Boa tarde!!

Felipe e , seri algo assim, casso fosse por meio de VBA.

Código: Selecionar todos

Sub AleVBA_5003()
'Esse recurso não é automatico, deve se inserir um bottão de commando para rodar a macro
'Para automatizar tente usar o evento -->  Worksheet_SelectionChange(ByVal Target As Range), dentro do módulo de planilha
Dim ws As Worksheet
For Each ws In Worksheets
    With ws
        .Cells.Replace What:="OI", Replacement:="TCHAU", LookAt:= _
        xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    End With
Next ws
End Sub

Att

[wpceid]

Eu consegui através deste código:

Código: Selecionar todos

Sub LocalizarSubstituir()

Sheets("Mês").Activate

ActiveSheet.Cells.Replace What:="NOME1", Replacement:="NOME2", LookAt:=xlPart, SearchOrder:=xlByRows

Obrigada a todos que ajudaram!