Помогите с listbox

[ElenaKorneva]

Здравствуйте, уважаемые программисты.
Помогите решить задачку.
На странице "Главная", кнопкой вызываю форму. В textbox начинаю вводить наименование товара, параллельно в listbox выводятся результаты поиска. Весь товар на листе ТМЦ, проблема в том, что в listbox выводятся позиции только из третьей колонки, а нужно, чтобы выводилась вся строка.

Почти все сделала, но с этим голову сломала.

[ElenaKorneva]

Забыла прикрепить сам файл

[Aleksandr H.]

В файле нету ни формы, ни макросов

[ElenaKorneva]

Извиняюсь, сохранила без макросов

[Aleksandr H.]

Private Sub TextBox1_Change()
    ListBox1.Clear
    iValue = prodazhi.TextBox1.Value
    For Each i In Worksheets("ТМЦ").Columns("C:C")
        Set iFinds = Worksheets("ТМЦ").Columns("C:C").Find(iValue, LookIn:=xlValues)
        If Not iFinds Is Nothing Then
            iFirstAddress = iFinds.Address
            Do
                ListBox1.AddItem iFinds.Offset(0, -2) & " " & iFinds.Offset(0, -1) _
                                    & " " & iFinds & " " & iFinds.Offset(0, 1)
                Set iFinds = Worksheets("ТМЦ").Columns("C:C").FindNext(iFinds)
            Loop While Not iFinds Is Nothing And iFinds.Address <> iFirstAddress
        End If
    Next
End Sub

[ElenaKorneva]

Сообщение от Aleksandr H.

Private Sub TextBox1_Change()
    ListBox1.Clear
    iValue = prodazhi.TextBox1.Value
    For Each i In Worksheets("ТМЦ").Columns("C:C")
        Set iFinds = Worksheets("ТМЦ").Columns("C:C").Find(iValue, LookIn:=xlValues)
        If Not iFinds Is Nothing Then
            iFirstAddress = iFinds.Address
            Do
                ListBox1.AddItem iFinds.Offset(0, -2) & " " & iFinds.Offset(0, -1) _
                                    & " " & iFinds & " " & iFinds.Offset(0, 1)
                Set iFinds = Worksheets("ТМЦ").Columns("C:C").FindNext(iFinds)
            Loop While Not iFinds Is Nothing And iFinds.Address <> iFirstAddress
        End If
    Next
End Sub

Спасибо огромное!

[IgorGO]

ElenaKorneva,
отличная цитата! без нее никто бы не понял за что сказано "спасибо" Aleksandr H.