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

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

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

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

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

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

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


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

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

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