How can I change the appearance of ListBox.Text after it has been selected.

I have a listbox whose list is populated by a dynamic range.
Each element will be selected two times. After the first time I would like the colour of the text to be changed from Black to Red and after the second time I would like the red Text to be struck through.
It is easy to do this to the source range, but unfortunately the Listbox still shows the black type. Can it be forced to mirror the attributes of the text in the source range?
I have attached a workbook to show where i start from. The two buttons are used to make the two different kinds of selection.
Help would be gratefully received.
John

David,
Thanks for your reply. It's a bid sad, but I can stop searching now and get on with my life!
John