Форум программистов, компьютерный форум, киберфорум
Наши страницы

VBA

Войти
Регистрация
Восстановить пароль
 
Andryshe4ka
0 / 0 / 0
Регистрация: 04.06.2015
Сообщений: 3
#1

Вычислить сумму - VBA

04.06.2015, 11:33. Просмотров 310. Ответов 1
Метки нет (Все метки)

Вычислить сумму
s= (sin1/1)-(sin2/2)-(sin3/3)-...+((-1)^n+1) * sin n/n. Для ввода значения n
на рабочем листе установить поля ввода TextBox, значение
суммы вывести в ячейку рабочего листа
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.06.2015, 11:33
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вычислить сумму (VBA):

Вычислить сумму - VBA
Вычислить сумму S=1!-2!+3!-......+n!

Вычислить сумму - VBA
Помогите создать программу(макрос) VBA в Excel Заранее спасибо. Вычислить P=(1-sin0.1)+(1+sin0.2)+...+(1+sin1.0). Мой код. n=1 ...

Вычислить сумму - VBA
S=1+Σ(k=1,10)1/k!, где k! = 1⋅2⋅3⋅…⋅k. Где что не правильно?? Private Sub calc_Click() Dim epx, a, s As Single Dim k, f As...

Вычислить сумму - VBA
Даны натуральное число n, действительное число х. Вычислить:

вычислить сумму - VBA
Здравствуйте решаю задачи по Златополькому и возникла проблема в 2 задачах. Не могу понять как задать условие (

Вычислить сумму ряда - VBA
Помогите пожалуйста написать программу для вычисления суммы ряда y=e^x-e^3*x+e^5*x-e^7*x+e^9*x-e^11*x+e^13*x; значение х задать вводом.

1
Vlad999
2653 / 1586 / 461
Регистрация: 02.11.2012
Сообщений: 3,912
04.06.2015, 17:07 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
на листе вставляете текстбокс из ActiveX и в него прописываете код
с проверкой число ли.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub TextBox1_LostFocus()
Dim n%, sumf#, i%
If IsNumeric(TextBox1.Value) Then
n = TextBox1.Value
Else
MsgBox "Ввести нужно число"
TextBox1.Activate
Exit Sub
End If
For i = 1 To n
 sumf = sumf + (-1) ^ (i + 1) * (Sin(i) / i)
Next
Cells(2, 3) = Format(Replace(sumf, ",", "."), "0,0000") '"Standard")
End Sub
макрос будет срабатывать после выхода из текстбокса и заносить ответ в ячейку С3.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.06.2015, 17:07
Привет! Вот еще темы с ответами:

Вычислить бесконечную сумму - VBA
Не знаю,с чего начать решение...

Вычислить сумму ряда - VBA
Всем доброго дня! Помогите пожалуйста, не успеваю. Заранее всем большое спасибо! 2. Составьте функцию VBA, которая в заданной матрице A...

Вычислить сумму ряда - VBA
Помогите вычислить функцию. Проблема в том, что я не знаю что делать со знаком суммы. Function fun11(x As Double) As Double Dim S As...

Вычислить бесконечную сумму - VBA
Приветствую, помогите, пожалуйста, решить вот такое задание (под номером 9). Заранее спасибо!


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru