Run-time error when reordering items in tables (ListObject)

Hi there, I encountered some annoying run-time errors when reordering items. I am using Excel 2010

I have a UserForm containing a ListBox, whose RowSource is set to a named table (ListObject). I would like to allow the user to reorder the items in the list by clicking up/down buttons, as well as the functionalities to add/remove. It works well sometimes, but in many cases I'll see a run-time error at the line

Please Login or Register  to view this content.

. Sometimes it's run-time error 1004 saying some methods (add/clear/cut etc.) failed. Sometimes it tells me the object invoked is disconnected from the clients... I guess I have done something really wrong but can't figure it out. Can anyone help? thanks in advance.

Here is a subroutine of a Down button in my UserForm:

Please Login or Register  to view this content.

Hi Norie, thanks a lot for your help! I just tried and it worked well.

One more question remained here. Sometimes the Add method of ListObject will trigger similar run-time error, too, saying something like 'Add method failed'. Is that caused by a similar problem, since I use table as RowSource for a ListBox in UserForm?

I append the table/ListObject to add new items to ListBox. Can I set RowSource to nothing, call the Add method, and then set RowSource back, to solve these problems?

Hi, I just re-produced an error when removing an item.
The error message: 'run-time error 1004, application-defined or object-defined error' at the line '.ListRows(i).Delete'

Actually may I know more underlying details about the problem using RowSource and ListObject?
Thanks a lot for your help in advance!

My code:

Please Login or Register  to view this content.

And similar error (Add method failed) can be seen in this code at line '.ListRows.Add':

Please Login or Register  to view this content.

Hi Norie, thank you very much! I'll try to use List in the future.

But it does not solve my problem of 'Add' and 'Delete' methods failures. I did not use ListObjects("Selected") as RowSource of any ListBox. May I know what can cause such failures?

Thanks again Norie. However I am afraid I cannot upload the entire workbook since the data are kind of sensitive... But as you can see in #7 and #8, .ListRows(i).Delete and .ListRows.Add fails sometimes, despite the fact that the ListObject "Selected" is not used as RowSource of any ListBox. Could you come up with some possible reasons and maybe suggest some approaches I can take to debug?

Hi Norie, any luck with the code? I know it is not good to ask for help like this. It is all fine if you don't have time, thanks a lot.