Не понимаю в чем ошибка. Помогите пожалуйста, весь инет облазил

Вот такая форма: https://imgur.com/kG2PX0D
Таблица: https://imgur.com/vKMoDZ2
Ошибка: https://imgur.com/KMLnNMU

-----------------------------------------------------------------------------------------------------------------------------
Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then Worksheets(«Товары»).Range(«l2») = CheckBox2.Caption
End Sub




Private Sub CommandButton1_Click()
Dim myRow As Integer
With goods
myRow = .ListObjects(«Autoo»).DataBodyRange.Rows.Count + 2
.Cells(myRow, «A»).Value = TextBox1.Text
End With
End Sub




Private Sub ListBox6_Click()
ListBox7.RowSource = Application.Substitute(ListBox6.Value, " ", "_")
End Sub
-----------------------------------------------------------------------------------------------------------------------------

Не понимаю что не так… Весь инет облазил. Помогите пожалуйста
Ответов пока нет

Сергей Климов

от 0 p.
Сейчас на сайте
Читать ответы

Александр

от 100 p.
Читать ответы

Антон

от 50 p.
Читать ответы
Посмотреть всех экспертов из раздела Технологии > Базы данных
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store