Всем добрый день!
Excel выдает ошибку, начиная со строки, выделенной жирным цветом.
Ранее макрос работал без проблем, сейчас внезапно стал выдавать ошибку.
Кто-нибудь может помочь разобраться в чем ошибка?? Уже всю голову сломала, в макросах новичок....
Excel выдает ошибку, начиная со строки, выделенной жирным цветом.
Ранее макрос работал без проблем, сейчас внезапно стал выдавать ошибку.
Кто-нибудь может помочь разобраться в чем ошибка?? Уже всю голову сломала, в макросах новичок....
Код |
---|
Sub AddBase() 'Добавление новой записи Set ShBase = ThisWorkbook.Worksheets("Клиентская база") Set BaseListObj = ShBase.ListObjects("АКБ_tb") Set BaseListRow = BaseListObj.ListRows.Add BaseListRow.Range(2) = Base.cbx_ts.Value ' здесь ошибка BaseListRow.Range(3) = Base.txb_suppl.Value BaseListRow.Range(4) = Base.txb_nameTT.Value BaseListRow.Range(5) = Base.txb_format.Value BaseListRow.Range(6) = Base.cbx_territory.Value BaseListRow.Range(7) = Base.cbx_city.Value BaseListRow.Range(8) = Base.txb_adress.Value BaseListRow.Range(9) = Base.cbx_type.Value BaseListRow.Range(10) = Base.cbx_status.Value BaseListRow.Range(11) = Base.txb_comment.Value BaseListRow.Range(12) = Base.cbx_manager.Value End Sub |