Remplissage TextBox en boucle

Bonjour à tous,

Dans un UserForm, j'ai 25 TextBox qui permettent d'encoder des tâches réalisées. Pour faciliter le traitement, elles sont nommées "TextBox1à25". Je voudrais affecter à chaque TextBox.Text une variable public qui garderait en mémoire le texte tapé de la sorte à chaque fois qu'on clique sur la croix rouge, on affecte le texte des TextBox à chaque variable.

Je voudrais utiliser une boucle du style pour gagner du temps et des lignes de code mais cela ne fonctionne pas vraiment ...

Private Sub UserForm_Initialize()
For i = 1 To 25
Me.Controls("TextBox" & i).Text = ("TxtBox" & i) 'je sais que ce code ne peut fonctionner puisque je renseigne simplement un texte
Next
End Sub

Et je fais l'opération inverse dans la méthode

UserForm_QueryClose

Je ne sais pas si qqun voit ce que je veux faire et peux m'aider ?!

D'avance merci à tous

J'ai trouvé mon erreur, je dois simplement utiliser une variable tableau qui contiendra tout le texte !