[VBA]If Range("D41").Value = "1" And Range("H122") = "1" Then sheets("136").select
If Range("D41").Value = "1" And Range("H122") = "2" Then sheets("148").select
If Range("D41").Value = "1" And Range("H122") = "3" Then sheets("154").select
If Range("D41").Value = "1" And Range("H122") = "4" Then sheets("160").select
If Range("D41").Value = "2" And Range("H129") = "1" Then sheets("224").select
If Range("D41").Value = "2" And Range("H129") = "2" Then sheets("230").select
If Range("D41").Value = "2" And Range("H129") = "3" Then sheets("236").select
If Range("D41").Value = "2" And Range("H129") = "4" Then sheets("248").select
If Range("D41").Value = "2" And Range("H129") = "5" Then sheets("254").select
[/VBA]