To get the formula for active cells;

Sub ShowFormula()

MsgBox ActiveCell.Formula

End Su

--
hidek
-----------------------------------------------------------------------
hideki's Profile: http://www.excelforum.com/member.php...fo&userid=1890
View this thread: http://www.excelforum.com/showthread.php?threadid=39949