I have this formula
Sub w3202L()
'
' w3202L Macro
'
'
Sheets("Misc").Select
Range("AA6").Select
ActiveCell.FormulaR1C1 = "=(R[1]C[-13])"
Range("AA6").Select
Selection.Copy
Range("AA6:AA370").Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _...