Thanks mate.. Cheers!!!

Quote Originally Posted by GTO View Post
Greetings wouldbeca,

There is no reason to select the sheet first, but disregarding that for the moment, you need to 'double-up' the quote marks within the string, to have it write the formula to the sheet correctly.

  Sheets("SCB_Rejection_Working").Select
  Range("A5").Formula = "=IF(ROW($A1:A1)>COUNTIF(SCB_Rejection!A:A,""*"")-1,"""",SCB_Rejection!M2)"
I hope that helps,

Mark