fixing "unspecified error"populate data in listbox based on textbox search

hi experts
I need help to fixing error unspecified error in this line

HTML Code: 

when I search in text box based on COL D
I hope some body help .

1. You cannot delete a listbox that you have valued with the RowSource, you have to reset the RowSource:

Please Login or Register  to view this content.

2. You cannot resize (ReDim) a two-dimensional array, this produces an error.

thanks

You cannot resize (ReDim) a two-dimensional array, this produces an error.

how fix it ,please?

@jindon thanks that's better . but there is problem . it doesn't show formatting of numbers and currency in columns which contains number as in earlier . may you fix it,please ?

Change to

Please Login or Register  to view this content.

@jindon thanks again . and sorry because I ask that . do me favor please ? when I search in textbox based on COL D it 's gone the number formatting and currency . how fix that ?also last thing I would cancel show date in first col in listbox

HTML Code: 

just replace for it sequences numbers 1,2,3 whether when run the userform or search in textbox
thanks for your cooperation .

2nd code in post #8 has been updated, so try.

yes this is good but should also show when run the userform when show data in listbox
thanks again

Do you wan to serial number instead of dates?
change that line to

Please Login or Register  to view this content.

exactly . you provide me a great help today .
thanks so much for every thing .
have a good night !

One more change
delete ".AddItem" within the loop

Please Login or Register  to view this content.