'If I_Count > 0 Then
'
' If t <= I_End(1) And t >= I_Start(1) Then
'
' Flow_N(i) = Static_Input_Flow_Per_Lane
'
'
' If Down_block = 1 And Up_block = 0 Then
' 'Scenario = 1
' Speed_N(t, i) = Speed_N(t, i) * 5 / 6
' Flow_N(i) = Flow_N(i) * 1
' Cells(20, 14) = Flow_N(i)
'
' ElseIf Down_block = 0 And Up_block = 1 Then
' 'Scenario = 2
' Speed_N(t, i) = Speed_N(t, i) * 2 / 3
' Flow_N(i) = Flow_N(i) * 3 / 2
' Cells(20, 14) = Flow_N(i)
'
' ElseIf Down_block = 1 And Up_block = 1 Then
' 'Scenario = 3
' Speed_N(t, i) = Speed_N(t, i) * 2 / 3
' Flow_N(i) = Flow_N(i) * 3 / 2
' Cells(20, 14) = Flow_N(i)


As You can see above,
this is for for approach. That is for North.
It has has 15 scenarios.

I need to write the same for West, South and East.
I can write it and use case or if/else and run.

What I exactly want to do is, with the same code I want to run all.
for example
If North is selected,

"Flow_" & Incident_Location.Value & "(" & i & ")" = Static_Input_Flow_Per_Lane
similarly for speed
"Speed_" & Incident_Location.Value & "(t,i)"= "Speed_" & Incident_Location.Value & "(t,i)" * 2/3

Where Incident_Location.Value is value from the combobox selected.