VBA to use Selection.Address in a formula

[simora]

arnelgp: Thanks.
It works.

      addr = Selection.Address
      ActiveSheet.Range("IG2").Formula = "=ColorFunction($IE$1 ," & addr & ",TRUE)"