☰

変数名を使用して Excel 2010 VBA でシートをアクティブ化する

tag-icon • tag-icon microsoft-excel vba
変数名を使用して Excel 2010 VBA でシートをアクティブ化する

変数名を使用してシートをアクティブ化しようとすると、添字が範囲外であるというエラーが発生します

変数はこのように宣言されます

Phonecall = Phones(i) & "-UnbilledData"

iが1の場合、Phonecallの値は「999-9999-UnbilledData」になります。

このステートメントは添え字エラーで失敗します

Sheets(Phonecall).Activate

このステートメントは正常に機能します:

sheets("999-9999-UnbilledData").activate

解決策は目の前にありますが、見つけることができません。どなたか助けていただければ幸いです。

答え1

まだ投稿していません薄暗い以下は問題なく動作します:

Sub dural()
   Dim Phones(1 To 2) As String
   Phones(1) = "999-9999"
   Phones(2) = "whatever"
   Dim Phonecall As String
   i = 1
   Phonecall = Phones(i) & "-UnbilledData"
   Sheets(Phonecall).Activate
End Sub

関連情報