リスト内の名前でワークシートをアクティブにする

Question

各ワークシートはプロジェクトを表します 最初のワークシート（「プロジェクトの選択」）では、すべてのワークシート名（セルA3：A50）を含むリストを作成しました 特定のセル（E4）は、このワークシートでは、私はあなた「を選択プロジェクト」VBAモジュールにこのコードを追加します

Answer 1

（セルE4の）その名前でワークシートをアクティブにしたいリスト からプロジェクトを選択します。

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Not Application.Intersect(Target, Range("E4")) Is Nothing Then 
     Dim projectName As Variant 
     projectName = [E4] 
     Sheets(projectName).Activate 
    End If 
End Sub 

このイベントハンドラ（[プロジェクトの選択]シートの任意の値が変更されたときにトリガされる）は、変更されたのはセルE4であり、そうであれば、このセルの値に基づいてシートをアクティブにします。