If you make a list in a two column range with the control name in the first column and the text you want in the next column, then you need a loop something like this:
Code:
for each cell in range("A2:A10")
me.control(cell.value).caption = cell.offset(, 1).Value
next
If you have different types of controls (I've assumed labels and buttons) you'd need to adjust for that.