Объект не поддерживает это свойство или способ?

Я пытаюсь ввести графы в Excel, но когда я вхожу в класс, он приходит с «Ошибка 428, объект не поддерживает это свойство или метод». Что я делаю не так?Объект не поддерживает это свойство или способ?

Option Explicit 
Sub HW09() 

Dim ng As Integer 
Dim v As String 

Do 

ng = InputBox("Please enter the student's numerical grade.") 
    If ng < 0 Then 
     ng = 0 
    ElseIf ng > 100 Then 
     ng = 100 
    Else 
End If 


Cells(c, 2).Value (ng) 
c = c + 1 

v = InputBox("Would you like to enter another grade? Type 'Y' for yes and 'N' for no.") 
    If v = "N" Then Exit Do 

Loop

источник

2013-09-30 user2829591

@ sam092 есть ответ. Я заметил это [в вашем предыдущем вопросе] (http://stackoverflow.com/a/19085142/1467082) и убедился, что мой ответ избегал этой ошибки. Кроме того, вы можете сделать это просто: 'Если MsgBox (« Вы хотите ввести другой класс? », VbYesNo) = vbNo Затем Exit Do' вместо того, чтобы полагаться на' InputBox' и неуклюжий пользовательский ввод буквы/строки :) –

Это должно быть

Cells(c, 2).Value = ng

Если вводить буквы как A, B, C вы должны получить вместо этого типа ошибок несовпадения.

Кроме того, я не вижу никакой инициализации для c

источник

2013-09-30 02:08:19 sam092

Объект не поддерживает это свойство или способ?

ответ

Смежные вопросы