Macro for Maximum of different sums

Help, please...
I need a macro who will determine the maximum of different sums of series.
A series means white cells with values. If a white cell with value it's followed by a white cell without value, the series it's end.
if the white cell it's followed by a different color cell, with no value, it's still a series if the next white cells contain a value.
a attached an exemple, i hope you can help me.
thank you very much, have a nice spring!

there's no hope for my problem?..

hello
i try to simplify the initial post:i need a macro who must to determine maximum of diferent sums from an array of numbers...
for instance: 1, 1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1
the maximum must to be 5
anyone please??

Thank you sktneer,
works perfect!!