Составьте программу на языке VBA для решения следующей задачи. Для семи видов продукции известна цена реальзации единицы продукции и количества реализованной продукции. Опредедить общую выручку от продажи всех видов продукции

Sub aaa()
    Dim s As Double, r As Range
    Set r = Range(«C2:D8»)
    s = 0
    For i = 1 To 7
        s = s + r(i, 1) * r(i, 2)
    Next i
    Cells(9, 3) = s
End Sub

Во вложении — файл с рабочей книгой Excel 2003

Скачать приложение к ответу

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *