2014-02-04 6 views
1

Я пытаюсь вычислить количество используемых строк в проекте VBA в Excel 2013, чтобы я мог заполнить его пользовательской формой (каждый раз, когда я нажимаю кнопку Сохранить, добавляет новую строку на рабочий лист). Рабочий лист также имеет две строки заголовка, поэтому я не хочу, чтобы они были перезаписаны.Ошибка 424 «Требуемый объект» при попытке рассчитать количество используемых строк

Это должно быть достигнуто с помощью следующего кода, который запускается на выполнение, как только я нажимаю кнопку Сохранить:

Private Sub Save_Click() 

Dim totalRows As Long 

totalRows = Daten.Cells(Rows.Count, "A").End(xlUp).Row 
If totalRows < 2 Then 
totalRows = 2 
Else 
totalRows = totalRows 
End If 

... 

End Sub 

Однако, когда я нажимаю на кнопку Сохранить, я получаю ошибку «424» Требуется объект» .

Я действительно потерял здесь - кто-нибудь знает, что я делаю неправильно Если вы хотите узнать больше, пожалуйста, скажите мне об этом, потому что я действительно хочу, чтобы увидеть эту работу

+2

Что такое 'Daten'? Из вашего фрагмента похоже, что это должен быть объект «Worksheet», но я не вижу, чтобы он был «Dim» в любом месте. Вы пробовали 'Таблицы (" Sheet1_orSheetName "). Ячейки ...'? –

+2

, где вы инициализировали переменную 'Daten'? –

+0

Ах да, это рабочий лист, который называется так. – Psyshadow

ответ

1

Это кажется. сделайте трюк (как предложено в комментариях)

Dim totalRows As Long 

totalRows = Sheets("Daten").Cells(Rows.Count, "A").End(xlUp).Row 
If totalRows < 2 Then 
totalRows = 2 
End If 
Смежные вопросы