Составьте программу на языке VBA для решения следующей задачи. Для семи видов продукции известна цена реальзации единицы продукции и количества реализованной продукции. Опредедить общую выручку от продажи всех видов продукции
Составьте программу на языке 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
Не нашли ответ?
Похожие вопросы