Use this code...
Saurabh..
1: 2:
lcol = Cells(20, "IV").End(xlToLeft).Column + 1 Cells(20, lcol).Formula = "=Your Formula"