Highlight Sequential Cells That Sum Up To A Value

[snb]

You must be kidding; it does exactly what you were asking for.

I fear you have no idea what the code is doing

You can easily adapt it to:

Sub snb()
  j = 1
  Do Until Application.Sum(Cells(2, 11).Resize(j)) >= Cells(1, 12).Value
    j = j + 1
  Loop
  Cells(j, 11).Interior.ColorIndex = 4
End Sub