Блог

Главная - Вопросы по программированию - Ошибка времени выполнения ‘380’: не удалось установить свойство Rowsource. Недопустимое значение свойства

Ошибка времени выполнения ‘380’: не удалось установить свойство Rowsource. Недопустимое значение свойства

#excel #vba

#excel #vba

Вопрос:

Это правильный способ использования функции rowsource?

Я продолжаю получать error '380' : could not set the Rowsource property. Invalid property value. при попытке вставить данные с помощью моей пользовательской формы.

 Dim iRow As Long

iRow = [Counta(Database!A:A)] 

With frmForm

    .lstDatabase.ColumnCount = 37
    .lstDatabase.ColumnHeads = True

If iRow > 1 Then    
     .lstDatabase.RowSource = "Database!A2:AK" amp; iRow
     Else
     .lstDatabase.RowSource = "Database!A2:AK2"
 End If

End With

Комментарии:

1. Как вы получаете iRow ?

2. У вас, вероятно, нет листа с именем Database .

3. Поделитесь еще частью кода. .lstDatabase Часть указывает, что вы находитесь внутри блока With .

4. Обновлен код @Simon.

5. @Storax уже назначил имя листа в качестве базы данных