have a question? -ask: 31419537
i will glad to answer
for A2000
Private Sub Form_Load()
Dim ctl As Control
Dim i As FormatCondition
'FormatConditions works only in form like "DataSheet" and for ListBox & Combobox & TextBox
'Then we must delete previous FormatConditions for each control
'...