Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.58/52: Рейтинг темы: голосов - 52, средняя оценка - 4.58
Gerkss
2 / 2 / 0
Регистрация: 06.05.2013
Сообщений: 50
1

Ошибка: Run-time error '5', Invalid procedure call or argument

09.12.2014, 18:54. Просмотров 10011. Ответов 4
Метки нет (Все метки)

Вообщем сделал программу всё работала пока не дописал выражение до конца и тут бах ошибочка. Вот код:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub CommandButton1_Click()
 
a = CInt(TextBox13.Text)
Worksheets(1).Range("B1").Value = a
e = CInt(TextBox14.Text)
Worksheets(1).Range("B4").Value = e
x = CInt(TextBox15.Text)
Worksheets(1).Range("B2").Value = x
b = CInt(TextBox16.Text)
Worksheets(1).Range("B3").Value = b
For i = 1 To 5
g = (a * x ^ (3 + i) + (b ^ (i + 2)) * Log(Abs(2 * x))) / (Sqr(a + Sin(2 * x) - e ^ Abs(3 * x)))
ListBox1.AddItem g
Cells(i + 5, 2) = g
Next i
End Sub
Private Sub ListBox1_Click()
For i = 1 To 5
Cells.Select
Selection.ClearContents
g = a * x ^ (3 + i) + (b ^ (i + 2)) * Log(Abs(2 * x))
ListBox1.AddItem g
Cells(i + 5, 2) = g
Next i
End Sub
Ошибка: Run-time error '5':
Invalid procedure call or argument

Я не слишком силен в VBA. Искал информацию о ошибка,но,как я понял на каждый случай свой выход. Прошу у Вас помощи.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.12.2014, 18:54
Ответы с готовыми решениями:

Функция Replace приводит к ошибке Run-time error ‘5’: Invalid procedure call or argument.
Прошу, подскажите в чем ошибка и как быть в следующей ситуации: Сбрасываю...

Ошибка: Invalid procedure call or argument. Что не так?
Имеется код. Он вроде считает, а вроде и нет. Выдает ошибку: Invalid procedure...

Invalid procedure call or argument
здравствуйте, Ворд 2003, как можно на строке SelectionText = Selection.Text...

Invalid procedure call or argument
здравствуйте, искал в интеренете ответа не нашел, для каждой задачи свое...

Ошибка "Invalid procedure call or argument" при вычислении синуса
Вообщем такое дело,есть код: Private Sub CommandButton1_Click() x =...

4
SoftIce
comment ca va
10452 / 3963 / 1013
Регистрация: 27.07.2011
Сообщений: 9,618
Завершенные тесты: 1
09.12.2014, 18:57 2
На какой строке ошибка?
Цитата Сообщение от Gerkss Посмотреть сообщение
Cells.Select
0
Gerkss
2 / 2 / 0
Регистрация: 06.05.2013
Сообщений: 50
09.12.2014, 18:58  [ТС] 3
g = (a * x ^ (3 + i) + (b ^ (i + 2)) * Log(Abs(2 * x))) / (Sqr(a + Sin(2 * x) - e ^ Abs(3 * x)))
0
SoftIce
comment ca va
10452 / 3963 / 1013
Регистрация: 27.07.2011
Сообщений: 9,618
Завершенные тесты: 1
09.12.2014, 18:59 4
Лучший ответ Сообщение было отмечено Gerkss как решение

Решение

Скорее всего пытаетесь извлечь корень из отрицательного числа.
1
Gerkss
2 / 2 / 0
Регистрация: 06.05.2013
Сообщений: 50
09.12.2014, 19:01  [ТС] 5
Спасибо большое. Вы правы!
0
09.12.2014, 19:01
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.12.2014, 19:01

Ошибка "Invalid procedure call or argument" при возведении числа в вещественную степень
Здравствуйте! Хотел посчитать среднее геометрическое некоторых ячеек. Я их...

"Invalid procedure call or argument"
Добрый вечер.Просмотрев кучу других тем, та и не смог разобраться со своей...

Ошибка Run-time error '13'
При заполнении таблицы на 3-4 строке выскакивает вот это; 'общая стоимость...


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

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

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