As written, the code should keep replacing the same range until it does the final caption (this happens faster than you can see). If you want it to keep adding then insert the text after the range or keep adding to the end or start of the range.
For example:
NeededForms.InsertAfter vbCr & oCtrl.Caption

__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia