テキストボックスのことで

エクセルの図形描画バーの中にあるテキストボックスで文字を作成すると、そのテキストボックスに自動的に番号が割り振られると思います。 マクロ文の中の　ActiveSheet.Shapes("Text Box 8").Select　のように。 この番号を変更することは可能でしょうか？ テキストボックス自体を削除して新しいのにするというのではダメです。 それは不可能という回答でもけっこうです。 御存知の方がいましたら教えて下さい。