Предмет: Информатика,
автор: grimit
Создайте макрос в Excel, который вычисляет произведение чисел,
расположенных в выделенном диапазоне 5-и ячеек
Ответы
Автор ответа:
0
Sub prod()
Dim p As Double
p = 1
For Each x In Selection
p = p * x.Value
Next x
MsgBox "Произведение равно " + CStr(p)
End Sub
Замечание: Ячейки могут располагаться в строке или столбце. Если их будет четное количество (а не 5), то они вообще могут располагаться в прямоугольнике - макрос универсальный. Числа могут быть целыми и/или вещественными.
Dim p As Double
p = 1
For Each x In Selection
p = p * x.Value
Next x
MsgBox "Произведение равно " + CStr(p)
End Sub
Замечание: Ячейки могут располагаться в строке или столбце. Если их будет четное количество (а не 5), то они вообще могут располагаться в прямоугольнике - макрос универсальный. Числа могут быть целыми и/или вещественными.
Похожие вопросы
Предмет: Английский язык,
автор: Romaluch
Предмет: Английский язык,
автор: nicilas900st
Предмет: Русский язык,
автор: КаМиЛлА2911
Предмет: Математика,
автор: GidroBaby