Квадратный корень суммы 2-ух чисел ( VBA) - Microsoft Office Excel

Warhead · 07.06.2010, 16:23

Создайте приложение для вычисления квадратного корня суммы 2 х чисел, если сумма больше 0. если результат будет меньше 30,то число должно быть выведено курсивом. Напишите код плз...
Заранее благодарен

EducatedFool · 07.06.2010, 17:21

Код:

Sub Приложение()
    a = 5: b = 45: If a + b > 0 Then [a1] = Sqr(a + b): If [a1] < 30 Then [a1].Font.Italic = True
End Sub

07.06.2010, 16:23	#1
Warhead Пользователь Регистрация: 13.10.2009 Сообщений: 17	Квадратный корень суммы 2-ух чисел ( VBA) Создайте приложение для вычисления квадратного корня суммы 2 х чисел, если сумма больше 0. если результат будет меньше 30,то число должно быть выведено курсивом. Напишите код плз... Заранее благодарен

07.06.2010, 17:21	#2
EducatedFool Программист VBA СуперМодератор Регистрация: 13.07.2008 Сообщений: 6,856	Код: `Sub Приложение() a = 5: b = 45: If a + b > 0 Then [a1] = Sqr(a + b): If [a1] < 30 Then [a1].Font.Italic = True End Sub` __Полезные надстройки для Excel. Парсинг сайтов и файлов. Макросы любой сложности на заказ. Мониторинг цен конкурентов

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
вычислить квадратный корень из произведения модулей чётных элементов Visual Basic	Madmozavr	Microsoft Office Excel	2	21.05.2010 16:41
Вычислить квадратный корень	Elfiniti	Помощь студентам	7	02.02.2010 00:36
квадратный корень в с++	ben95	Общие вопросы C/C++	9	09.02.2009 15:42
Корень квадратный помогите написать	Woha	Общие вопросы C/C++	5	27.10.2008 06:18
Корень квадратный	BETONOMESHALKA	Общие вопросы Delphi	2	01.11.2007 10:06