В блоке ячеек заменить нулями отрицательные значения - VB

Узнай цену своей работы

Формулировка задачи:

Привет всем!!!! Помогите пожайлуста мне решить задачку: В блоке ячеек А1 : С7 заменить нулями отрицательные значения, подсчитать количество замен и установить размер шрифта в этих ячейках равным 14. Буду оч благодарен!!!

Решение задачи: «В блоке ячеек заменить нулями отрицательные значения»

textual
Листинг программы
n = 0
For i = 1 To 7 '1-7
  For j = 1 To 3 'A-C
    If Val(Cells(i, j).Text) < 0 Then
      n = n + 1
      Cells(i, j).Formula = 0
      Cells(i, j).Font.Size = 14
    End If
  Next j
Next i

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.125 из 5
Похожие ответы