In one For loop not shown in the code I have found a cell (I, "T") And I've given it a value Wash2. Now the Column T is a list of times. For every row in column T after I, I want to add 15 mins to the previous time. I've set up a new counter as J which is I + 1, and want to loop the the end of the column which is the variable F15Last. Unfortunately I can only get it to execute once and not loop until F15Last. Any ideas?
Interface.Cells(I, "T").Value = Wash2 J = I + 1 Do While J <= F15Last Ref3 = Interface.Cells(J, "T") ' Ref3 = Ref3 - Int(Ref3) CheckNow10 = Interface.Cells(J, "AA") CheckNow10.Value = Ref3 ' If Int(Ref4) - Int(Ref3) > 0 Then 'If time is in a new day need to change the day number ' Interface.Cells(J, "S").Value = Interface.Cells(J, "S").Value + 1 ' Else ' End If 'Interface.Cells(J, "T").Value = TimeAdd + Ref3 J = J + 1 Loop