如果打不开文件,这样设置试试:1、表预处理公式设为:AddTimer("X",10,"If(colsel = 1,SetBackColor(Row,1,Row,Cols,16776960), True )") And Move(1,2)2、行验证公式设为:SetBackColor(Row,1,Row,Cols,0)3、表验证公式设为:DeleteTimer("X")