создание макроса - Помощь студентам

андрей1972 · 04.12.2014, 18:22

Помогите...мне надо создать макрос, заполняющий диапазон ячеек A1:С5 произвольным числом и подсчитывающий в ячейке C7 сумму всех ячеек. По окончании работы макроса должно появиться диалоговое окно с надписью "Расчет окончен". В excel.

doober · 05.12.2014, 05:17

Без проблем.

Код:

Sub Макрос()
    Range("A1:C5").FormulaR1C1 = "=RANDBETWEEN(0,100)"
    Range("B7").FormulaR1C1 = "=SUM(R[-6]C[-1]:R[-2]C[1])"
    MsgBox "Расчет окончен"

End Sub

04.12.2014, 18:22	#1
андрей1972 Новичок Джуниор Регистрация: 04.12.2014 Сообщений: 1	создание макроса Помогите...мне надо создать макрос, заполняющий диапазон ячеек A1:С5 произвольным числом и подсчитывающий в ячейке C7 сумму всех ячеек. По окончании работы макроса должно появиться диалоговое окно с надписью "Расчет окончен". В excel.

05.12.2014, 05:17	#2
doober Старожил Регистрация: 02.05.2009 Сообщений: 3,907	Без проблем. Код: `Sub Макрос() Range("A1:C5").FormulaR1C1 = "=RANDBETWEEN(0,100)" Range("B7").FormulaR1C1 = "=SUM(R[-6]C[-1]:R[-2]C[1])" MsgBox "Расчет окончен" End Sub` Анализ,обработка данных Недорого

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Создание макроса	Diamatra	Microsoft Office Word	0	15.01.2014 13:33
создание макроса	sha69	Microsoft Office Excel	6	14.09.2011 07:34
Создание макроса.	EvgeniyavM	Microsoft Office Excel	9	02.02.2011 14:47
Создание макроса	Ленусик777	Microsoft Office Excel	4	28.05.2010 14:49
Создание макроса	SeregaSled	Microsoft Office Access	2	28.12.2009 05:55