vba - 可変文字列を使用して名前でタブをアクティブにするExcel VBA

Question

誰か助けてくれませんか？このタイプの問題は単純なもので、何度も回答されているように感じますが、有効な解決策が見つからないようです。エラー 9 が発生しました: 添字が範囲外です。

欲求不満のかなりの部分は、機能するコードの単純さによるものです。「Dist.12345-Store.67890」のような名前のタブを持つスプレッドシートがあります。以下を使用すると、そのタブが正常に開く VBA コードがあります。

Sub test()
Worksheets("Dist.12345-Store.67890").visible = true
End sub

しかし、この文字列を 31 の異なるサブルーチンでコードに 31 回ハード コードするのではなく、文字列を変数 storeselect2 としてまとめ、この文字列を表示するワークシートとして参照したいと考えています。しかし、私はそのエラー9を受け取ります...

Sub test()

Dim storeselect2 As String

storeselect2 = "Dist." & ActiveCell.Offset(0, -1).Value & "-Store." & ActiveCell.Value
` the storeselect2 is now = "Dist.12345-Store.67890" `

Sheets(storeselect2).Visible = True  `this is where error 9 occurs`

End Sub

文字列を使用してコード内のタブ名を参照するときに、既存のタブを表示するにはどうすればよいですか? あるタブからの文字列が別のタブを開こうとしていることが原因ですか?

ありがとう！！