[COLOR="DarkSlateGray"][B] ActiveCell.Formula = "=IF(COUNTIF([TdB.xls]Status!$G:$G,Base!C6)>0,""x"","""")"
ActiveCell.FormulaLocal = "=SI(NB.SI([TdB.xls]Status!$G:$G;Base!C6)>0;""x"";"""")"
ActiveCell.FormulaR1C1 = "=IF(COUNTIF([TdB.xls]Status!C7,Base!R[3]C[2])>0,""x"","""")"
ActiveCell.FormulaR1C1Local = "=SI(NB.SI([TdB.xls]Status!C7;Base!L(3)C(2))>0;""x"";"""")"[/B][/COLOR]