How do I make my macro insert/paste code in specific column range?

[Rabbitstew]

How do I make my macro insert/paste a specific code?

For example I want to paste a specific code for range of cells in a column:

Range("F2").Select
    ActiveSheet.Paste
    Selection.AutoFill Destination:=Range("F2:F296"), Type:=xlFillDefault

The code I want to paste is:

=IF(OR(ISNUMBER(SEARCH({"@","/"},E2))),"",IF(ISERROR(RIGHT(RIGHT(E2,3),3-MIN(FIND(0,SUBSTITUTE(RIGHT(E2,3),{1,2,3,4,5,6,7,8,9},0)&0))+1)+0),"",RIGHT(RIGHT(E2,3),3-MIN(FIND(0,SUBSTITUTE(RIGHT(E2,3),{1,2,3,4,5,6,7,8,9},0)&0))+1)+0))

How do I tie these together so when I run the macro it will automatically paste the code above into specific range in column?

Thanks in advance!