Collection Textbox

Bonjour,

Je réveille une demande datant d'une dizaine de jours

Dans ma feuille j'ai 4 textbox nommés tb1, tb2, tb3, tb4
Je voudrais accéder à l'un quelconque d'entre eux via une variable contenant son nom/numero
j'ai tenté

Shapes("tb" & nums).Select
Selection.ShapeRange.ZOrder msoBringToFront
Shapes("tb" & nums).Locked = False
Shapes("tb" & nums).Text = "toto"

les trois premières instructions fonctionnent bien mais l'accès à la propriété Text m'est refusée "propriété ou méthode non gérée par cet l'objet" (rien détonnant puisqu'elle elle ne figure pas dans les propriétés disponibles d'un objet shape!!)
J'ai aussi tenté sans succès
Shapes("tb" & nums).Characters.Text = "toto"
Il doit y avoir une sombre histoire de Collection là dessous, mais je n'y arrive( toujours) pas

https://www.cjoint.com/c/CJEnOrMgH11

Je suis sous Excel 2003

Merci