Ошибка 214735257. Что делать?

[cerberochek]

Добрый день, уважаемые!

Есть у меня начальная форма - Форма1 - на которой расположена кнопка. При нажатии на эту кнопку должна открыться Форма2, в кнопке у меня написано Форма2.Show.

Раньше все было хорошо,форма2 открывалась без проблем, но сегодня при нажатии на кнопку мне выдает сообщение:
"Run-time error '-2147352571 (80020005)': Type mismatch."

И сам вопрос: что с этим делать?

[R Dmitry]

Сообщение от cerberochek

Добрый день, уважаемые!

Есть у меня начальная форма - Форма1 - на которой расположена кнопка. При нажатии на эту кнопку должна открыться Форма2, в кнопке у меня написано Форма2.Show.

Раньше все было хорошо,форма2 открывалась без проблем, но сегодня при нажатии на кнопку мне выдает сообщение:
"Run-time error '-2147352571 (80020005)': Type mismatch."

И сам вопрос: что с этим делать?

Так поможет

Private Sub Кнопка0_Click()
DoCmd.OpenForm "Форма2"
End Sub

[cerberochek]

Спасибо за ответ!

Сделал так как Вы описали, но теперь мне выдало другую ошибку:

Run-time error '2102':
Имя формы "Форма2" содержит ошибки или указывает на несуществующую форму.

Хотя имя формы я напрямую скопировал из Properties window, и форма само собой существует.

[Woodlin]

cerberochek, попробуйте тогда создать макрос на открытие формы, там ошибки быть не должно.

[cerberochek]

попробуйте тогда создать макрос на открытие формы, там ошибки быть не должно.

А можно пожалуйста поподробнее, ато я пока еще не очень хорошо разбираюсь в access. Вы имеете в виду чтоб создать отдельный макрос, как это было описано выше в ответе R Dmitry или макрос привязать к действию "открытие формы" (если такое есть тут)?
Если Вам не сложно, опишите это пожалуйста как-нибудь в виде кода)))

Спасибо!

[R Dmitry]

Скорее всего, у Вас еще происходит событие на открытие формы, в котором и возникает эта ошибка, при ошибке нажмите на debug, и сделайте скрин кода vba где возникает ошибка, но.... самый надежный способ , это выложить свой файл, а люди помогут сразу найти и устранить ошибку

Дмитрий

[cerberochek]

К сожалению скрин сделать не могу, ровно так же как и выложить код, по одной простой причине: политика безопасности на работе не позволяет загружать файлы в инет(

А происходит это примерно так:
на главной форме есть кнопка CommandButton1, там же стоит и несколько OptionButton-ов, когда я выбираю нужный мне вариант и нажимаю на кнопку идет такой код:

Private Sub CommandButton1_Click()
   Form1.hide
   
   If Form1.OptionButton1.Value Then
      Form2.Show

      ElseIf Form1.OptionButton2.Value Then
         Form3.Show

         ElseIf Form1.OptionButton3.Value Then
            Form4.Show

   End If

End Sub

Когда оставляю в таком варианте идет ошибка Type Mismatch, когда пишу как предлагали Вы, т.е вместо Form2.Show пишу DoCmd.OpenForm "Form2", то уже идет ошибка несуществования формы.
При этом две другие формы открываются без проблем.

[R Dmitry]

Сообщение от cerberochek

К сожалению скрин сделать не могу, ровно так же как и выложить код, по одной простой причине: политика безопасности на работе не позволяет загружать файлы в инет(

А происходит это примерно так:
на главной форме есть кнопка CommandButton1, там же стоит и несколько OptionButton-ов, когда я выбираю нужный мне вариант и нажимаю на кнопку идет такой код:

Private Sub CommandButton1_Click()
   Form1.hide
   
   If Form1.OptionButton1.Value Then
      Form2.Show

      ElseIf Form1.OptionButton2.Value Then
         Form3.Show

         ElseIf Form1.OptionButton3.Value Then
            Form4.Show

   End If

End Sub

Когда оставляю в таком варианте идет ошибка Type Mismatch, когда пишу как предлагали Вы, т.е вместо Form2.Show пишу DoCmd.OpenForm "Form2", то уже идет ошибка несуществования формы.
При этом две другие формы открываются без проблем.

сначала выполните этот код
если форма откроется тогда, выполните следующий и посмотрите какое будет сообщение, подозреваю что там трабл

Private Sub CommandButton1_Click()
Form2.Show
End Sub

Private Sub CommandButton1_Click()
     msgbox cstr(Form1.OptionButton1.Value) 
 End Sub

[cerberochek]

Уважаемый R Dmitry, сделал так как Вы сказали:
1) закомментировал весь свой код, оставил только Form2.Show: все то же самое - Type mismatch
2) второй код показал, что в момент выполнения OptionButton1 имеет значение True, то есть по идее должно работать

[R Dmitry]

Сообщение от cerberochek

Уважаемый R Dmitry, сделал так как Вы сказали:
1) закомментировал весь свой код, оставил только Form2.Show: все то же самое - Type mismatch
2) второй код показал, что в момент выполнения OptionButton1 имеет значение True, то есть по идее должно работать

ну что тут еще сказать, сбрасывайте свою форму на форум, а мы тут покумекаем что и как .
______________
попробуйте переименовать эту форму, или сделать копию, старую удалить, а затем копии вернуть нормальное название.