Updating Cell References by Adding Additional Column

[Mable]

Hi,

I was wondering if anyone could help me? I have inserted an additional column in a spreadsheet with coding on and i need to change the references in vb but im unsure which number to change. I have inserted a new column in column 'B' so all the references need to be changed by one to make the coding work again. I have copied a small amount of the code so if someone could point me in the right direction it would help alot.

' checks if phase runs in preceeding stage for phase 1 and needs integreen including in green time calcs
If Stage = 1 And Cells(40 + Phase, 4 + Stage) = "YES" And Cells(40 + Phase, 4 + Stages) = "YES" Then
Green = Green + (Cells(33, (4 + Stage)).Value) + (Cells(34, (4 + Stage)).Value)
GoTo Skipped
' checks if phase runs in preceeding stage and needs integreen including in green time calcs
ElseIf Cells(40 + Phase, (4 + Stage)) = "YES" And Cells(40 + Phase, (3 + Stage)) = "YES" Then
'adds phase green time and preceeding intergreen time to toal value of green for phase
Green = Green + (Cells(33, (4 + Stage)).Value) + (Cells(34, (4 + Stage)).Value)
GoTo Skipped
ElseIf Cells(40 + Phase, (4 + Stage)) = "YES" Then ' if phase does not run
'adds only phase green time to toal value of green for phase
Green = Green + (Cells(33, (4 + Stage)).Value)
GoTo Skipped

 

[Andrew Poulsom]

I reckon 4 + Stage needs to be 5 + Stage, and 3 + Stage needs to be 4 + Stage.

 

[Mable]

Thanks i will give it a try