Sequence of numbers (separated by zeros) with highest SUM

Hi guys

I have a column (a big column) with a sequence of numbers separated by zeros. I want to know how i can copy to another column the sequence of numbers (separated by zeros) that is SUM is the highest.
I give you an example below:

A B
0
1
2
0
1
2
3
0
1 1
2 2
3 3
4 4
0

Thank you guys

finction index, max, agregate

Here, try this:

Thank you guys, but:

tim201110, i dont want the SUM in another column, i want the numbers that make highest SUM.
zbor, that formula work in my example but not in my real workboot.

I will attach the workbook. (I have some columns and i have to do this for all of them, so the best thing for me is: if i have 20 columns, the formula must give me another 20 columns with that numbers i want)

My try.
You need to copy your data in column A of Sheet1, run macro and result will be in column B.

Please Login or Register  to view this content.

Thank you guys, but:

shg, you do it well but in my workbook that gave my an error: Set rInp = rInp.Offset(1).Resize(rInp.Rows.Count - 1)
YasserKhalil, it works too, but in column L the sequence that appears is not the highest SUM
mikerickson, that macro works but dont give me the right results
kasan, doesnt work

@ Daniel88
What do you mean by "does not work"? Some error or what?
You need to be sure, that sheet name is "Sheet1" and copy only one column of data in column A. Then run macro and resulting sequence will be in column B - to the right of same sequence in column A.
My file works fine with your data, at least for me on my PC.

Kasan sorry, you are right. I forgot to check the numbers in the end of the column B. I was ready to find numbers right at the start. my bad

Too much time on that "sheet"

Thank you once again

It's Ok
I should mention where my solution put the result in prev. post, actually I tried to make it like in your example in the first post.

By the way, there is an solution to do this to all columns at the same time?? and maybe put the results on another sheet.
Im asking this because i got a lot of data. This is the values from the precipitation, i got 4 meteorological station, where each one has 20 columns +-

I just reported what i saw. So i dont know why the error...
i dont understand that programming stuff. I only do a copy/paste of the scripts that all of you give me and check the sheet and columns to see if it corresponds with the script.

Probably should work with all filled columns in sheet "Sheet1".
Result should be in sheet "result".
Columns 13 and 19 contains only 0, so no results for them.

Ok, right, you the boss
Works well. If i have more questions, you know what i will do

Thank you again

Same logic, by now you can choose sum number, I mean enter 40 in Sheet1 cell X7 and macro will return all sequences with sum > 40 in sheet result.

Probably I explained wrong. I dont want the sequence that sum is >40. I want the sequences that have >40 inside. like this:

0
10
15
20
0
10 10
20 20
45 45
0

Ok, this one will return all sequences containing numbers greater than number from cell X7.

Works well

Thanks once again. I should put your name in my thesis