Encontre células específicas na coluna N, altere o valor na coluna O

Question

Eu sou novo na codificação VBA e estou tentando procurar um nome na coluna N e substituo o valor na coluna O.

Eu tentei modificar esse código, mas não consigo substituí-lo pela célula ao lado dele.

Columns("N").Replace What:="27", _
                            Replacement:="AARON", _
                            LookAt:=xlPart, _
                            SearchOrder:=xlByRows, _
                            MatchCase:=False, _
                            SearchFormat:=False, _
                            ReplaceFormat:=False

    

Answer 1

Você pode usar este código VBA para encontrar valor em uma coluna específica:

Columns("N:N").Select
Set cell = Selection.Find(What:="YourName", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False)

E isso pode ser usado para substituir:

Columns("O").Replace What:="Your Old Value", Replacement:="New Value", _
            LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:= _
            False, ReplaceFormat:=False

Como funciona:

• O código pode ser usado como Standard Subroutine com a planilha.
• Substitua o valor por Find & Replace no código conforme sua escolha.