Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Проверка наличия значения в ячейке, нужно проверить ячейку на наличие в нем числа
 
#1
22.10.2022 13:27:28
День добрый! Подскажите пожалуйста, нужно проверить ячейку (условие) на наличие в нем числа, если в нем есть значение то итог считаю как "значение" *100, если ячейка с условием пуста, то итог считаю как "значение"*150.  
 
 
 
#2
22.10.2022 13:45:53
Код
Sub iFormula()
Dim i As Long
Dim iLastRow As Long
 iLastRow = Cells(Rows.Count, "B").End(xlUp).Row
  For i = 2 To iLastRow
    If Not IsEmpty(Cells(i, "A")) Then
      Cells(i, "C") = Cells(i, "B") * 100
    Else
      Cells(i, "C") = Cells(i, "B") * 150
    End If
  Next
End Sub
 
 
 
#3
22.10.2022 13:45:56
=ЕСЛИ(ЕПУСТО(A2);B2*150;B2*100)
Изменено: aset224 - 22.10.2022 13:46:59
 
 
 
#4
22.10.2022 14:05:56
Цитата
написал:
Код
    [URL=#]?[/URL]       1  2  3  4  5  6  7  8  9  10  11  12      Sub   iFormula()    Dim   i   As   Long    Dim   iLastRow   As   Long       iLastRow = Cells(Rows.Count,   "B"  ).  End  (xlUp).Row        For   i = 2   To   iLastRow          If   Not   IsEmpty(Cells(i,   "A"  ))   Then            Cells(i,   "C"  ) = Cells(i,   "B"  ) * 100          Else            Cells(i,   "C"  ) = Cells(i,   "B"  ) * 150          End   If        Next    End   Sub  
 
спасибо
 
 
 
#5
22.10.2022 14:06:28
Цитата
написал:
=ЕСЛИ(ЕПУСТО(A2);B2*150;B2*100)
вот, то что нужно, спасибо
 
 
 
Страницы: 1
Наверх