Я новичок в кодировании VBA и пытаюсь найти имя в столбце N и заменить значение в столбце O.

Я пытался изменить этот код, но не могу заменить его рядом с ячейкой.

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

1 ответ1

0

Вы можете использовать этот код VBA, чтобы найти значение в определенном столбце:

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

И это может быть использовано для замены:

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

Как это устроено:

  • Оба кода могут использоваться в качестве Standard Subroutine с рабочим листом.
  • Замените значение на Find & Replace в коде согласно вашему выбору.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .