Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Изменить определенное значение ячейки на значение соседней, Найти в столбце2 значение NA и заменить его на значение в соседней ячейке из столбца1
 
#1
03.04.2017 16:55:55
Доброго дня. Помогите в решении данной задачки. В примере есть два столбца, необходимо в столбце2 найти значение NA и заменить его на значение которое находиться в той же строке, но в столбце1. Заранее благодарен за подсказки и помощь.
 
 
 
#2
03.04.2017 17:16:06
Код
Sub NA()
Dim i As Long
Dim iLastRow As Long
Dim FoundCell As Range
   iLastRow = Cells(Rows.Count, 1).End(xlUp).Row
    Set FoundCell = Columns(2).Find("NA", , xlValues, xlWhole)
     If Not FoundCell Is Nothing Then
      Do
       FoundCell = FoundCell.Offset(, -1)
       Set FoundCell = Columns(2).FindNext(FoundCell)
      Loop While Not FoundCell Is Nothing
     End If
End Sub
 
 
 
#3
03.04.2017 17:19:26
а просто функция ЕСЛИ в соседнем третьем столбце не подходит?
 
 
 
#4
03.04.2017 17:20:35
Спасибо огромное.
 
 
 
#5
03.04.2017 17:39:34
Код
Sub NA()
With Range("B2:B" & Cells(Rows.Count, 1).End(xlUp).Row)
    .Replace What:="NA", Replacement:=""
    .SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=RC[-1]"
    .Copy
    .PasteSpecial Paste:=xlPasteValues
End With
Application.CutCopyMode = False
End Sub
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
Страницы: 1
Наверх