Finding combinations meeting criteria

[tiredofit]

I have a row of six numbers: 100, 200, 300, 350, 80, 90.

This sums to 1120.

I would like to find all the combinations that exceed 50% of the total, ie 560.

So the result should be:

100​	200​	300​
100​	200​	350​
300​	350​
100​	300​	350​
200​	300​	350​
100​	200​	300​	350​
200​	300​	80​
100​	200​	300​	80​
200​	350​	80​
100​	200​	350​	80​
300​	350​	80​
100​	300​	350​	80​
200​	300​	350​	80​
100​	200​	300​	350​	80​
200​	300​	90​
100​	200​	300​	90​
200​	350​	90​
100​	200​	350​	90​
300​	350​	90​
100​	300​	350​	90​
200​	300​	350​	90​
100​	200​	300​	350​	90​
100​	300​	80​	90​
200​	300​	80​	90​
100​	200​	300​	80​	90​
100​	350​	80​	90​
200​	350​	80​	90​
100​	200​	350​	80​	90​
300​	350​	80​	90​
100​	300​	350​	80​	90​
200​	300​	350​	80​	90​
100​	200​	300​	350​	80​	90​

Does anybody have some VBA code to achieve this?

Thanks

 

[SanjayGMusafir]

Does anybody have some VBA code to achieve this?

You don't need VBA for that

1. You can do same with Conditional Format OR
2. Using a helper column

whichever suits you

Better SHare data using XL2BB to help you provide better solution.

 

[tiredofit]

You don't need VBA for that

1. You can do same with Conditional Format OR
2. Using a helper column

whichever suits you

Better SHare data using XL2BB to help you provide better solution.

Can you elaborate?

All the info you have is the 6 numbers.

The table of results I posted was computed manually.

I want to get the table of results, using VBA.

 

[SanjayGMusafir]

Can you elaborate?

Share XL2BB

The data you have shared gets converted to text to use