Создайте макрос, который поместит из таблицы 1 общую стоимость по позициям по которым количество больше 50 - VBA

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

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

Добрый день! Прошу помощи, всю работу сделала за 3 часа, но вот с макросом заморочка. Прикладываю работу, на первом листе задание, на втором выполненная работа. Пожалуйста помогите.

Решение задачи: «Создайте макрос, который поместит из таблицы 1 общую стоимость по позициям по которым количество больше 50»

textual
Листинг программы
  1.     Dim c As Range, sum As Double
  2.     For Each c In Range("d16:d35")
  3.         If c > 50 Then sum = sum + c.Offset(, 2)
  4.     Next
  5.     Range("D10") = sum

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


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

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

15   голосов , оценка 4.067 из 5

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

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

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