How can I merge two strings and use them as a name?

For example: I want to sort through a a bunch of textboxes and refer them to certain cells. I know I can have a string "TextBox" and then the looping number "nbr" and merge them into for instance TextBox1.
But I can't figure out how to use this as a command. Like

for nbr=1 to 5
TextBox(nbr).caption=cells(nbr,2)
next nbr

If the textboxes are on a worksheet ie embedded

    For nbr = 1 To 5
        ActiveSheet.OLEObjects("TextBox" & nbr).Object.Value = cells(nbr,2)
    Next

On a userform

    For nbr = 1 To 5
           Me.Controls("TextBox" & nbr).Value = Sheets("Sheet1").Cells(nbr, 2)
    Next