In the button, after you change the color, add: ListBox1.InvalidateCell -1, 1
This redraws all cells in column 1. _______________________________________________ Unsubscribe or switch delivery mode: <http://www.realsoftware.com/support/listmanager/> Search the archives: <http://support.realsoftware.com/listarchives/lists.html>