Troubleshoot Search feature in VBA userform

I notice the code takes a long time to run.
When you click the button a second time, you get the result after because the code finally finished running the first time.

When you step through the code you will notice your lastrow variables are for the last row of the sheet, not the last filled row.

You could select the data and copy it to a new sheet, delete the old sheet and rename the new sheet as the old sheet. Once saved, the wb will be a lot smaller and the lastRw variables should match the actual last filled row.

Your Table(ListObject) has 1048560 blank rows
This sample will give you an idea...I have deleted all your code...
Open file...Click Button top of page...Then select Filter By and then start typing in Search Value
The data will filter in listbox as required...No search button required...
Some advice...Leave the controls to default names...this allows for easy reference and looping...
It's crazy and pointless renaming them all...

Please Login or Register  to view this content.

Please Login or Register  to view this content.