runtime error 381 invalid property array index что это
Runtime error 381 invalid property array index что это
This forum has migrated to Microsoft Q&A. Visit Microsoft Q&A to post new questions.
Answered by:
Question
I am using the following code to pull data from a worksheet and drop it into a listbox on a form. The code works fine if the If statement is not there, or if I remove the condition and change it to true, but with the code as written, I get the error indicated in the subject line. Any suggestions for how to fix this?
Answers
This happens because when you are skipping a cell that has X your workRow variable increments as well.
So if you add row 2 and 3 and skip 4 and try to add 5 then you have got index 4 empty.
You could modify the for loop a bit adding an extra variable nxtItem to keep track of the index to add to
and increment that variable every time a new item has been added to the list.
Как исправить ошибку во время выполнения 381
| Номер ошибки: | Ошибка во время выполнения 381 | |
| Название ошибки: | Invalid property-array index | |
| Описание ошибки: | A property value may consist of an array of values. | |
| Разработчик: | Microsoft Corporation | |
| Программное обеспечение: | Windows Operating System | |
| Относится к: | Windows XP, Vista, 7, 8, 10, 11 |
Фон «Invalid property-array index»
Люди часто предпочитают ссылаться на «Invalid property-array index» как на «ошибку времени выполнения», также известную как программная ошибка. Разработчики программного обеспечения, такие как Microsoft Corporation, обычно принимают Windows Operating System через несколько уровней отладки, чтобы сорвать эти ошибки перед выпуском для общественности. К сожалению, иногда ошибки, такие как ошибка 381, могут быть пропущены во время этого процесса.
Пользователи Windows Operating System могут столкнуться с сообщением об ошибке после выполнения программы, например «A property value may consist of an array of values.». Сообщение об этой ошибке 381 позволит разработчикам обновить свое приложение и исправить любые ошибки, которые могут вызвать его. Затем Microsoft Corporation исправляет эти дефектные записи кода и сделает обновление доступным для загрузки. Поэтому, когда вы сталкиваетесь с запросом на обновление Windows Operating System, это обычно связано с тем, что это решение для исправления ошибки 381 и других ошибок.
Как триггеры Runtime Error 381 и что это такое?
Большинство ошибок Invalid property-array index являются результатом отсутствия или повреждения версии файла, установленного Windows Operating System. Как правило, решить проблему позволяет получение новой копии файла Microsoft Corporation, которая не содержит вирусов. В качестве последней меры мы рекомендуем использовать очиститель реестра для исправления всех недопустимых Invalid property-array index, расширений файлов Microsoft Corporation и других ссылок на пути к файлам, по причине которых может возникать сообщение об ошибке.
Ошибки Invalid property-array index
Наиболее распространенные ошибки Invalid property-array index, которые могут возникнуть на компьютере под управлением Windows, перечислены ниже:
Проблемы Windows Operating System Invalid property-array index возникают при установке, во время работы программного обеспечения, связанного с Invalid property-array index, во время завершения работы или запуска или менее вероятно во время обновления операционной системы. Выделение при возникновении ошибок Invalid property-array index имеет первостепенное значение для поиска причины проблем Windows Operating System и сообщения о них вMicrosoft Corporation за помощью.
Причины проблем Invalid property-array index
Проблемы Invalid property-array index могут быть отнесены к поврежденным или отсутствующим файлам, содержащим ошибки записям реестра, связанным с Invalid property-array index, или к вирусам / вредоносному ПО.
Особенно ошибки Invalid property-array index проистекают из:
Совместима с Windows 2000, XP, Vista, 7, 8, 10 и 11
Runtime error ‘381’ Invalid property array index
hi good morning,
I would like to ask why when I run my program, but it appears a message like this «Runtime error ‘381 ‘Invalid property array index».
I am confused about this because I am still a beginner 🙂
what is the solution for this?
This is my code:
- 7 Contributors 19 Replies 2K Views 4 Days Discussion Span Latest Post 8 Years Ago Latest Post by vividiah
Please post the actual string value of SQLTambah so we can see the query you are running.
Doh! Time for new reading glasses. Either that or stop posting at 3:00 am
I agree with Pritaeas. If that doesn’t work, you can try adding a breakpoint and see where the problem is exactly.
All 19 Replies
Please post the actual string value of SQLTambah so we can see the query you are running.
Doh! Time for new reading glasses. Either that or stop posting at 3:00 am
I agree with Pritaeas. If that doesn’t work, you can try adding a breakpoint and see where the problem is exactly.
For : Pritaeas, dom246
I’ve replaced it become like this
but the error was there on the second row,
and the problem is its array index,
I am confused please help,
and dom246 if you could explain more details about the breakpoint?
I still do not understand
Hai Jim,
Can you explain in more detail about the actual value of SQLTambah string that is in my program?
I still do not understand what you mean,
and the value will print in the immedate window (View\immedate window)
Or:
2.
To place a break in your program put your cursor in the margin to the left of any executable line (not a comment and not a declaration)
Click in the margin. A circle should appear in the margin and the executable line will highlight.
The code will pause at this line.
If i is declared in the sub you can HOLD your cursor over i and its value will show in a note by the cursor.
First you must know what the meaning of the error warning.
«Runtime error ‘381 ‘Invalid property array index».
You said that vb pointing you in line 2 ( List2.Selected(i) = True ) when error is came up, it means that your selected index is not available on the list.
Hai Jx_Man,
if my index is not available in the list should I do?
because it’s what I use code like this
For : Klahr_R
I’ve added this code on the first line,
but the error still remains as in the beginning Klahr_R,
even though I have added the code.
is there any other possibility?
I’ve absolutely no index?
I spent some time trying to generate the 381 error from this code. I found two cases where the index for List2.Selected(index?) will throw a 381:
if the index? is greater than the largest index, which would happen with the original code posted going to List2.ListCount + 1
If I may ask a silly question, does the routine fail on the first time through the loop, or on a subsequent time through? I ask this, because your logic appears to do this:
1. Start the loop
2. Set the «selected» property to «True» in every case
3. Check to see if the «selected» property is «True», which it will always be since you just set it that way.
4. Execute some SQL
5. Execute some other subroutines (and we don’t know what happens in them)
6. Do it again for the next row in the listbox.
So the next obvious question is, are you in your «cmdMovetoRight_Click», «Command1_Click» or «Form_Load» subroutines, RESETTING the listbox «List2» so that it’s empty? Let’s think with this. If you do that, then the listbox’s ListCount would be zero. So, when your iteration variable «i» tries to point to the NEXT row, there will not be a valid listbox row to point to.
My suggestion is investigate the other routines, find out if the listbox is being reset anywhere, fix that, and maybe even rethink your listbox handling logic.
Good luck! Hope this helps!
Bit Bit:
All you say may well be true and worthwhile suggestions, but the List2.Selected(X) automatically triggers a List2 click event which, as I understand it in this case, causes the text boxes to update. Consequently some (unseen) code executes between the two lines. An interesting albeit unusual method.
As with most early efforts, Job 1 is to get it working, then improve and polish.
Klahr_R:
I’ve tried some of the code you have given me, I have been using code like this:
and the result is that I can Select two data simultaneously, but if I possessed the data in the list more than two data will appear error ‘381 ‘is,
if I use code like this:
and the result is that I can only Select only one data,
thanks, 🙂
Bit Bit:
okay thanks for all your help,
logic that you provide is true according to my logic for this,
so maybe I did not investigate it,
but if you could give advice to the code that you think is more correct?
@vividia: Without knowing what the other routines are doing, it’s really kind of hard to suggest anything. As I mentioned above, I suspect that somewhere in one of the called routines, your listbox is either being reloaded or cleared out, and that causes a situation where your iteration variable «i» is trying to point to a list entry that no longer exists. But since you didn’t post the code to those routines, we can only assume or guess.
Is there a specific reason you have to retrieve the data and load the form before you can insert it into the database? Unless there is some kind of fancy processing going on in there, have you considered just looping through the list box one time, and using a «insert into. select from» and push all the heavy lifting onto the DBMS? Just a thought.
Почему ошибка при вызове формы?
Есть кнопка на рабочем листе которая вызывает некую форму. Вот код вызова:
Так вот, суть проблемы в следующем. В Excel 97 c сервис паком всё открываеться нормально, а под Excel 2002 данная процедура выдаёт следующую ошибку:
Run-time error ‘381’:
Could not set the List property. Invalid property array index.
Чуть не забыл, код прописан в разделе Microsoft Excel Objects в первол листе книги.
33 ответа
Originally posted by blind7
Есть кнопка на рабочем листе которая вызывает некую форму. Вот код вызова:
Так вот, суть проблемы в следующем. В Excel 97 c сервис паком всё открываеться нормально, а под Excel 2002 данная процедура выдаёт следующую ошибку:
Run-time error ‘381’:
Could not set the List property. Invalid property array index.
Чуть не забыл, код прописан в разделе Microsoft Excel Objects в первол листе книги.
Если кнопка на листе создана с помощью панели «Формы», то попробуйте Private Sub заменить на Public Sub.
Если кнопка создана с помощью панели «Элементы управления», то проверьте соответствие свойства «Name» кнопки и имени процедуры-обработчика события «Click».
Если кнопка на листе создана с помощью панели «Формы», то попробуйте Private Sub заменить на Public Sub.
Если кнопка создана с помощью панели «Элементы управления», то проверьте соответствие свойства «Name» кнопки и имени процедуры-обработчика события «Click».
Раз так, то давайте кое-что уточним.
1. Формы в «ошибочных случаях» не появляются на экране вообще?
2. Если ответ на 1-й вопрос «да», то нет ли в процедурах инициализации этих форм действий по настройке элементов управления типа «ListBox»?
3. Если ответ на 2-й вопрос «да, есть», то не выполняются ли аналогичные действия для «нормального случая»?
4. Если ответ на 3-й вопрос «нет, не выполняются», то, думается, что «копать» надо именно инициализацию элементов типа «ListBox».
Дело в том, что очень похожее сообщение об ошибке (и по коду, и по содержанию) возникает при неверном обращении к элементам списка.
Посмотрите вот этот материал:
http://support.microsoft.com/default.aspx?scid=kb;en-us;110957
Раз так, то давайте кое-что уточним.
1. Формы в «ошибочных случаях» не появляются на экране вообще?
2. Если ответ на 1-й вопрос «да», то нет ли в процедурах инициализации этих форм действий по настройке элементов управления типа «ListBox»?
3. Если ответ на 2-й вопрос «да, есть», то не выполняются ли аналогичные действия для «нормального случая»?
4. Если ответ на 3-й вопрос «нет, не выполняются», то, думается, что «копать» надо именно инициализацию элементов типа «ListBox».
Дело в том, что очень похожее сообщение об ошибке (и по коду, и по содержанию) возникает при неверном обращении к элементам списка.
Посмотрите вот этот материал:
http://support.microsoft.com/default.aspx?scid=kb;en-us;110957
1) В ошибочном случае не появляеться вообще.
2) Простите, а что есть нормальный случай. Повторюсь что в офисе 97 всё работает. К тому же ещё одно уточнение из трёх кнопок запускающих формы, работает исправно в 2002 только 1. Но в ней инициализация прописана также как и в 2 остальных (естественно имена различны).
3) в процедуре инициализации непрописаны listBox
4) В форме действительно есть один элемент списка, но, в 97 он работает исправно.
1) В ошибочном случае не появляеться вообще.
2) Простите, а что есть нормальный случай. Повторюсь что в офисе 97 всё работает. К тому же ещё одно уточнение из трёх кнопок запускающих формы, работает исправно в 2002 только 1. Но в ней инициализация прописана также как и в 2 остальных (естественно имена различны).
3) в процедуре инициализации непрописаны listBox
4) В форме действительно есть один элемент списка, но, в 97 он работает исправно.
Может выложите коды и формы «на пробу». Проверю у себя на разных версиях «Офиса».
так а куда можно скинуть исходник?
тама архивчик на 46 килобайт.
Попутно возниколо несколько вопосов, но их я смогу задать только после размещения исходника, ибо насколько понимаю без понимания о чём речь, нельзя ответить можно ли воплотить задуманное.
Извините за путанность и сбивчивость речи.
Кладите архив сюда же. Правила форума позволяют прикрепить к сообщению файл до 1 МБ.
Cобственно вот оно.
1)Собственно первая и третья кнопка описывает событие и вываливается с ошибкой в офиссе2003, вторая кнопка не описана и открывается на ура.
2)Хотелось бы сюда же добавить сохранение в файл с последующим вытаскиванием по параметру дата
3) И заменить присутствующую билеберду перевода цифр в текст, на более нормально написанное.
А вот как реализовать эти пункты незнаю (((
А ларчик просто открывался, надо заменить :
Originally posted by pashulka
А ларчик просто открывался, надо заменить :
Это надоже :-(. И ведь говорили поверь список, повеил:-(( Век живи век учись. Сенку. а то лоб разбил об эту поблему.
Теперь поблем меньше ровно на 1.
Набравшись смелости спошу:
Можно ли добавить к данным формам возможность сохранения данных.
Имеется ввиду чтобы по нажатии на «сохранить» в форме, данные сохранялись либо на отдельный лист, либо в файл. Гм, а щё лучше чотбы эти сохранённые данные можно было в дальнейшем вызволить в форму для редактиования. В какой области копать??
Для решения Вашей задачи можно использовать уже известное Вам свойство List, например :
Private Sub UserForm_Initialize()
Me.ComboBox1.List = Range(«A1:A5»).Value
‘ComboBox1.List = Range(«A1:A5»).Value
End Sub
Private Sub CommandButton1_Click()
Range(«B1:B5»).Value = Me.ComboBox1.List
‘Range(«B1:B5»).Value = ComboBox1.List
End Sub
Примечание :
— В принципе, данные находящиеся в ComboBox, ListBox можно записать и в файл, например текстовый.
— Не забывайте, что у ComboBox, ListBox есть ещё свойство RowSource, применение которого позволит Вам связать свой элемент управления с указанным диапазоном ячеек. При этом все изменения сделанные в указанном диапазоне будут отображаться в списке.
ComboBox1.RowSource = «A1:A5»
‘или
ComboBox1.RowSource = Range(«A1:A5»).Address
P.S. Обратите внимание на то, что свойство RowSource доступно только если ComboBox, ListBox расположен на MSForm, для этих же элементов управления, расположенных на рабочем листе применяют свойство ListFillRange
Могу предложить код, который преобразует целые числа в диапазоне от 0 до 999999999 в их текстовое описание. Может быть пригодится для Вашей задачи.
Опубликованный выше код будет работать только в MS Excel 2000 и выше, так как использует StrReverse, которая появилась только в VB 6.0
Учитывая, что Вы также работаете и в MS Excel 97 возможно Вам окажется полезна данная ссылка, так как большинство программ написаны в период с 97 по 99 г.
P.S.
Зря Вы назвали решение проблемы суммы прописью с помощью формул белибердой, так как людей которые решили этот вопрос именно этим способом на несколько порядком меньше, чем тех, кто написал свою собственную пользовательскую функцию. Скажу даже больше, многие абсолютно уверены, что решить этот вопрос с помощью формул невозможно.
Попробую прикрутить данную функцию, понять бы ещё как, но думаю что удастся с этим справиться.
Тихо тихо движемся к финальному месту.
А какие предвидятся сложности в «прикрутке» функции?
Если не знаете, куда вставить её код, то лучше всего в тот же модуль кода, где находится и вызывающий её макрос.
Вот прямая ссылка на одну из функций суммы прописью :
Для просмотра программного кода функции введите пароль nikita Функция будет работать в MS Excel 97, 2000, 2002. Есть небольшой help и т.д. и т.п.
Originally posted by pashulka
Вот прямая ссылка на одну из функций суммы прописью :
Сенкю, запихнул данную функцию в свой можуль и вызываю её как там и сказано, всё работает. Уря.
А вот вопрос, можно ли в excel сделать такое.
Данные из формы сохраняются на отдельный лист книги. Это я как раз сейчас пишу, хотя ругаеться excel страшно, но думаю это осилю.
Теперь то что нужно получить.
Имеем например 3 записи за определённое число (пусть это будет например 10 апреля)
Как в форму вызвать эти данные?
Чуть подробнее имеем
запись такая-то
запись такая-то
запись такая-то
все за 10 апреля, помимо етого естественно есть записи за другие числа.
Так вот понадобилось исправить например запись под номером 2, но я естественно уже не помню что там есть.
Ещё точнее как сделать выборку по конкретному числу или это уже к access?
в далеке моячат 2 варианта:
1) заходим на лист где сохраняються данные, находим ту запись которая нужна для редактирования, и каким то образом отсылаем её в форму, тока как ето сделать незнаю, но можно подумать.
2) имеем форму в которой есть календарь, в этом календаре выбираем число и туда заносятся построчно данные.
Можно ли такое реализовать?
Или вот нет ли в excel элемента похожего на перемещение по записям в access?
Много вопросов и все теоретические. Вот пытаюсь понять можно ли реализовать хоть какой то вариант.
Написал и понял чо наверно поспешил, ведь есть элемент ScrollBar, можно ли его применить для данного случая? с учётом того что как то надо прикрутить к нему чтобы он скролил данные за заданную дату.
Гм. Короший пример. Он натолкнул меня на то что можно производить заполнение на основе поискового фильтрика который будет отсекать данные по дате и ещё какому-нибудь уникальному параметру. Самое главное что такой параметр имеется и это упрощает процесс.
Пошёл копать в обозначенном Вами направлении.
1) Конечно можно, просто мне было проще задать его вручную.
2) Можно воспользоваться стандартным элементом управления Календарь. Если таковой отсутствует на Панели инструментов, то его необходимо выбрать в списке Дополнительных элементов.
Вот несколько примеров сравнения исходных данных (в данном случае фамилий) и значений элементов списка ListBox, путём перебора всех элементов списка.
Можно и немного по другому :
For iCount = LBound(iMassiv) To UBound(iMassiv)
If «Иванов» = iMassiv(iCount, 0) Then
Rem Необходимые действия
End If
Next
P.S. Если Вы воспользуетесь элементом управления Календарь, то вместо Фамилий будете сравнивать с выбранной датой.
Originally posted by pashulka
1) Конечно можно, просто мне было проще задать его вручную.
2) Можно воспользоваться стандартным элементом управления Календарь. Если таковой отсутствует на Панели инструментов, то его необходимо выбрать в списке Дополнительных элементов.
Вот несколько примеров сравнения исходных данных (в данном случае фамилий) и значений элементов списка ListBox, путём перебора всех элементов списка.
Можно и немного по другому :
For iCount = LBound(iMassiv) To UBound(iMassiv)
If «Иванов» = iMassiv(iCount, 0) Then
Rem Необходимые действия
End If
Next
P.S. Если Вы воспользуетесь элементом управления Календарь, то вместо Фамилий будете сравнивать с выбранной датой.
Мучился несколько дней, учитывая свой опыт в vba(малюсенький)
Не получается сделать (хотя примеры тут привели очень наглядные) следующее:
Научился задавать диапазон для listbox и организовать поиск по условию, но
Скомпоновать вместе задание диапазона ограниченного существующими данными для listbox и фильтра по условию не получается.
Так сказать немогу их склеить.
Можно ли попросить привести пример в котором это реализовано?
Например 3 фамилии с именами и надо выбрать определённую фамилию. Имею ввиду чтобы listbox был заполнен фамилией например Иванов.
На самом деле я подразумевал несколько другой алгоритм :
/// загрузка в ListBox всех данных конкретной таблицы (см.пример)
— выбор определённой даты в элементе управления Календарь
/// поиск этой даты в определённом столбце ListBox
/// выделение всей строки, содержащую самую первую найденную дату ***
— визуальное определение нужной строки и её выбор в ListBox *** (см.пример)
— изменение нужных данных в TextBox, которые отображают элементы списка выделенной строки в ListBox (см.пример)
— запись изменённых данных в соответствующие ячейки рабочего листа (см.пример)
Что касается фильтра, то насколько я знаю в ListBox нет фильтра, который например можно применить к ячейкам рабочего листа, поэтому если Вам по всей видимости остановить свой выбор на одном из трёх нижеперечисленных вариантах (или добавить к этому списку свой альтернативный вариант) :
— изначально «загружать» только данные соответствующие выбранному условию/критерию отбора
— создать дополнительный элемент, например ComboBox/ListBox и «загружать» в него данные соответствующие выбранному условию/критерию отбора
— после «загрузки» данных в ListBox c использованием свойства List удалять все данные несоответствующие выбранному условию/критерию отбора
P.S. Но лично я под этими вариантами не подписываюсь, ибо консервативен и лично меня устраивает мой алгоритм решения этой задачи.
Originally posted by pashulka
На самом деле я подразумевал несколько другой алгоритм :
/// загрузка в ListBox всех данных конкретной таблицы (см.пример)
— выбор определённой даты в элементе управления Календарь
/// поиск этой даты в определённом столбце ListBox
/// выделение всей строки, содержащую самую первую найденную дату ***
— визуальное определение нужной строки и её выбор в ListBox *** (см.пример)
— изменение нужных данных в TextBox, которые отображают элементы списка выделенной строки в ListBox (см.пример)
— запись изменённых данных в соответствующие ячейки рабочего листа (см.пример)
Пересмотрел ещё раз примеры, пошёл от простого.
Так как не получаеться практически посмледний блок.
Имеем:
Создал форму в которую поместил listbox, разбил его на 4 колонки, в эту же форму добавил кучу элементов которые соответствуют той информации которая забита на странице, получилось произвести считывание в эти элементы с листа эксель.
Но тут начинаються но.
1) возвращаясь к пердыдущим постам, есть код
Как здесь задать заполнение не с активного лист а любого. Попробовал подставить Worksheets, всё равно заполнение происходить только с активного листа. ((
2) Данные считываються вот таким образом и подставляються в нужные элементы на форме
Вроде бы правильно. данные считываються, используя готовый код подставляються в опись и распечатываються, но как сохранить их в туже строку откуда они взяты? Сохраняться они сохраняються но где попало.
Использую следующий код:
Чуть не забыл
3) почаму то данные из столбца «Дата Операсии» подставляютсья в форму в странном формате:
имеем «01,05,2005» в форму подставляеться «38473»