>With This .BackColor = Iif(Deleted(Juststem(.RowSource)),Rgb(128,0,0),Rgb(255,255,255)) .ForeColor = Iif(Deleted(Juststem(.RowSource)),Rgb(255,255,255),Rgb(0,0,0)) .refresh() Endwith