I am trying to retain the a cell address so that after I
perform a few other routines I can go back to that cell
(activate) and do other things. This is what I have and
its not working.

Dim st As String

If IsEmpty(ActiveCell)=True