Listbox Rowsource bug

Hello friends,
I'm having challenge in my VBA code especially In Rowsource property.
here is my code:

Please Login or Register  to view this content.

Please check this code for me because I notice the code works well the first time I click on the button. It bugs the second time on ListBoxProjets.RowSource.
Please I need help

I agree with Bakerman2.

This is from http://www.snb-vba.eu/VBA_Fill_combobox_listbox_en.html

"If you use 'rowsource' you make a direct link to a certain range in a worksheet.
Combined with the combobox it can cause Excel to blackout, because any change in the combobox will be transferred directly to the 'source'.
Excel has proven not to be able to do this correctly.
Besides: the changing of the source at every change in the combobox slows down your code.
You should reduce the reading/writing from/to a workbook in your code as much as possible."

Thank you bakerman2 for your answer. The reason why I used RowSource Property is because I wanted to show the ColumnHeads. Your solution one does not show them. Do you know how to promote columnheads using your solution?

One way to do it is to create another listbox, place it above the first listbox, populate the table header into it. You can play with many properties to change its appearance like background color, font size etc.