Напишите в среде Excel макрос, который в выделенном диапазоне ячеек должен выполнять заданные действия - VBA

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

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

Напишите в среде Excel макрос, который в выделенном диапазоне ячеек должен выполнять заданные действия и записывать результат в смежную с диапазоном колонку: Выделить цветом значения, величина которых находится в интервале от 100 до 200, и подсчитать количество таких значений. Каркас для макроса написала,но не могу понять как в условие впихнуть интервал от 100 до 200?
Листинг программы
  1. Sub Count_()
  2. Dim count1, count2, count As Integer
  3. count = 0
  4. For count1 = 0 To 2
  5. For count2 = 0 To 4
  6. If 100<=(Abs(ActiveCell.Offset(count2, count1).Value))<=200 Then
  7. count = count + 1
  8. ActiveCell.Offset(count2, count1).Font.Color = -16776961
  9. End If
  10. Next count2
  11. Next count1
  12. MsgBox ("К-во ячеек в интервале от 100 до 200 = " & count)
  13. End Sub

Решение задачи: «Напишите в среде Excel макрос, который в выделенном диапазоне ячеек должен выполнять заданные действия»

textual
Листинг программы
  1. If 100<=(Abs(ActiveCell.Offset(count2, count1).Value)) And (Abs(ActiveCell.Offset(count2, count1).Value))<=200 Then

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


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

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

12   голосов , оценка 4.083 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы