текст в TextBox-е

[Bezdar]

Прошу помощи! Нужно в TextBox записать значения несмежных ячеек. Значения проверяются циклом.
Спасибо.

[SAS888]

Т.е. в цикле сцепить значения нужных ячеек и результат поместить в TextBox? Примерно так:

Private Sub UserForm_Initialize()

'Объявляем строковую переменную и присваиваем ей пустую строку
    Dim MyText As String
    MyText = ""
    
'Пусть это Ваш цикл, где перебираются требуемые ячейки
    For i = a To b
        '
        'Здесь Ваш код
        '
        MyText = MyText & Cells(x, y) ' Наращиваем (сцепляем) строку
    Next
    
'Заносим результат в TextBox1
    TextBox1.Text = MyText

End Sub

Или я не верно понял суть вопроса? Какая разница: смежные ячейки, или нет?

[Bezdar]

Огромное спасибо! Все получилось. И все так предельно просто.