Я пытаюсь удалить последнюю строку таблицы слов, когда нет данных по определенной строке в таблице слов, используя VBA. Но пока все, что он делает - это удаляет последнюю строку и выдает ошибку пропавшего объекта.
Я попытался установить свойство Text, так как в документации сказано так:
Set VCell = objTable2.Cell(j,2).Range.Text
Но это не работает, так как выдает ошибку о том, что требуется строковый объект.
Это код, который я использую для удаления:
If j < 9 Then
For i = 1 To Ubound(TC_STP_Array)
objTable2.Rows.Last.Select
Set VCell = objTable2.Cell(j,2).Range.Text
If objTable2.Rows.Last.IsLast and VCell = "" Then
objTable2.Rows.Last.Cells.Delete
End If
Next
End if
Первая ошибка, которую я получаю:
Требуемый объект: '[string "•"]'
на линии:
Set VCell = objTable2.Cell(j,2).Range.Text
и когда в строке есть данные, я получаю это:
Требуемый объект: '[string "Test •"]'
Есть идеи, как это решить?