|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
03.12.2010, 00:12 | #1 |
Пользователь
Регистрация: 18.05.2010
Сообщений: 87
|
Создание массива
Здравствуйте.
Хотел внутри макроса задать массив, но не тут то было... привиду пример неработающего кода, там впринципе должно быть понятно чего мне хочется.... как то вроде всё как в учебнике с объявлением массива, но там явно что-то не то... Public Function proba(rgn1 As Range, M As Double) As Double Dim n As Long, s As Double, j As Long, i As Long Dim RR1 RR1 = rgn1.Value Dim A() For j = 0 To M - 1 For n = 1 To UBound(RR1) / M A(j) = A(j) + (1 / M) * ((RR1(n + j * M, 1) - 2) ^ 2) Next Next proba = UBound(A) End Function подскажите что не так... Заранее всем спасибо. |
03.12.2010, 00:46 | #2 | |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Цитата:
То что выделил синим-не понял смысла Вот .что вы хотите получить Код:
Анализ,обработка данных Недорого
Последний раз редактировалось doober; 03.12.2010 в 00:51. |
|
03.12.2010, 11:08 | #3 |
Пользователь
Регистрация: 18.05.2010
Сообщений: 87
|
то что выделено синем является показателем того, что массив создан и функция работает. Эта функция не несёт смысловой нагрузки, а является обучающим примером... то что мне надо очень долго расписывать, много громоздких формул которые суть дела не изменят...
и да, спасибо, вроде всё заработало. теперь буду придавать смысл всей функции. Последний раз редактировалось drNabla; 03.12.2010 в 11:15. |
03.12.2010, 11:26 | #4 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
А чего ей работать,если при n>2
n + j * M выходит за размерность массива сравните при n =2,результат одинаков,как и писал выше Код:
Анализ,обработка данных Недорого
|
04.12.2010, 15:51 | #5 |
Пользователь
Регистрация: 18.05.2010
Сообщений: 87
|
да это поспешил и перепутал пределы цикла, надо их поментяь у j и n и тогда всё корректно будет, лично моя ошибка.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание массива из файла | EvilHero | Общие вопросы C/C++ | 3 | 21.11.2010 22:00 |
Создание массива указателей | Fataller | Помощь студентам | 4 | 14.09.2009 09:55 |
создание массива | lg12 | Помощь студентам | 13 | 23.08.2009 15:13 |
Динамическое создание массива | Juggernaut | Общие вопросы Delphi | 3 | 20.05.2009 15:13 |
Создание массива компонентов | artemavd | Общие вопросы Delphi | 8 | 30.03.2009 15:43 |