Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Не срабатывает событие UserForm_Initialize
 
#1
19.03.2013 12:23:01
Привет всем

В упражении из самоучителя (пример во вложенном файле), не получается запустить событие UserForm_Initialize.
Изначально имя формы было UserForm1. Если поставить UserForm1_Initialize (и везде  UserForm1),то форма выводится на экран, но остальные операторы в событии игнорируются. Если из имени формы и из кода убрать единицу (т.е. везде UserForm) при вызове события генерируется ошибка:
Run-time error '424'
Object required
Как исправить эту ошибку?
 
 
 
#2
19.03.2013 12:31:34
У Вас на OptinalButton1 не ругается?
 
 
 
#3
19.03.2013 13:21:20
Видимо, причина дейсвительно, в том что неправильно написал OptionButton1.
 
 
 
#4
19.03.2013 13:34:20
Использование Me. при написании кода позволят избежать таких ошибок: пишем Me, ставим точку, и набираем первую букву искомого контрола - VBA сам покажет список, из которого можно выбрать требуемый.
 
 
 
#5
20.03.2013 10:08:19
Поправил OptionButton1 и попробыва использовать Me.
Почему-то не грузится картинка "VBA3_F1.BMP" (небольшая картинка из Excel - гистограмма). Еще появляется ошибка в строчке ReDim ЭлементыСписка (i To m, 0 To 1) :
Run-time error'9'
Subscript out of range

Как исправить эти ошибки?

Если в коде не прописан путь до картинки, то VBA ищет ее в той же папке, что и файл из которого запускается макрос?
Изменено: Андрей Куравлев - 20.03.2013 10:11:47
 
 
 
#6
21.03.2013 11:07:33
Картинка стала появляться (прописал полный путь к ней), но если ее удалить, блок-обработчик ошибок не срабатывает. В чем ошибка?
Код
On Error GoTo Сообщение0
Сообщение0:

If Err.Number = 52 Then
MsgBox "Нет графического файла VBA3_F1.BMP" & Chr(13) & "Работаем без картинки", vbCritical, "Выплаты"
End If

Resume Next
Изменено: Андрей Куравлев - 31.03.2017 10:02:16
 
 
 
#7
31.03.2017 08:56:16
У меня подобная проблема. Одна userform запускается без проблем. Скопировал ее, изменил имя и ссылки в коде и при запуска втрой формы выходит Run-time error 424: Object required. Не пойму, что ни так (((

Причина найдена! Оказывается в UserForm_Initialize осталась строка с ComboBox3, которую я уже удалил с формы!
Изменено: voice - 31.03.2017 09:20:14
 
 
 
#8
31.03.2017 09:17:57
Цитата
Андрей Куравлев написал: ошибка в строчке ReDim ЭлементыСписка (i To m, 0 To 1)
Может Вы хотели написать
ReDim ЭлементыСписка (1To m, 0 To 1)
Согласие есть продукт при полном непротивлении сторон
 
 
 
#9
31.03.2017 09:25:02
Цитата
Андрей Куравлев написал: блок-обработчик ошибок не срабатывает
Он срабатывает, только у Вас обрабатывается ошибка с номером 52, все остальные - мимо.
Код
Сообщение3:
If Err <> 0 Then
    MsgBox "Нет графического файла VBA3_F3.BMP" & Chr(13) & "Работаем без картинки", vbCritical, "Выплаты"
End If
Изменено: Sanja - 31.03.2017 09:25:47
Согласие есть продукт при полном непротивлении сторон
 
 
 
#10
31.03.2017 09:38:54
упс, не обратил внимания на дату темы. А поднявший ее товарищ проблему решил сам :)
Согласие есть продукт при полном непротивлении сторон
 
 
 
Страницы: 1
Читают тему
Наверх