Find Largest Values Greater than 'X' in VBA

[mabeaver]

Currently I have a pretty good macro that almost performs the task I want (see below). I would like for this macro to find all values greater than or equal to the value the user chooses in a particular cell.
Right now the macro below is pulling the 15 largest values, (Dim lLarge(1 To 15) As Long) but I would like for it to only pull the values larger than the cell I have designated as losslimit (and I would like for the user to be able to change this number whenever he/she wishes).

Note: The part of the macro that pulls the dates is working perfectly and does not need to be altered.
I have attached the workbook that is the final product. I have filled in some dummy values already. To better explain, if the user put 50,000 into C15 (of WC Summary) the 'Details' table should show only values 600,000; 111,100; 100,000; & 50,000 (these values found in WC Input with arrays named WC_YearX). If the user were to change C15 to 200,000, the 'Details' table should only show 600,000.

Please Login or Register  to view this content.

[tigeravatar]

mabeaver,

In the future, please wrap your code in code tags per the forum rules (link in my sig).
As to your question, I think something like this is what you're looking for:

Please Login or Register  to view this content.

[mabeaver]

That works great. I really appreciate the help.

I'm going to work this into the rest of the workbook for all of the other lines of business (worksheets) and make sure it works there too.

[mabeaver]

So I tried applying the same code to my other worksheets (Auto Summary, GL Summary) and it worked fine for the GL, but the 'Policy Effective Date' column did not pull through correctly. I attached that portion of the spreadsheet, and used the following code:

Please Login or Register  to view this content.

Can you point out the portion of the code that is pulling the 'Policy Effective Date' and explain where I'm going wrong?

Thanks!

[mabeaver]

Nevermind, I figured it out. Code works great, much appreciated.