Я больше не понимаю мир. Надеюсь на помощь.
Я заполняю список:
lstHst.Clear
lstHst.AddItem
Debug.Print lstHst.ListCount; Tab; lstHst.ColumnCount
For i = 0 To lstHst.ColumnCount - 1
Debug.Print lstHst.Column(i, 0)
Next
Debug.Print показывает 15 столбцов. Но после 9 столбцов я получаю ошибку 80070057
1 15
Null
Null