例

With Text1(1)
Call trns(なんとか)
End With

Sub trns(t as textbox)
end sub

なんとかの部分に Text1(1)を 意味するものが入れたいのです。

どうしたらいいのでしょうか？