Range("a1") = ThisWorkbook.Path
or
Range("a1") = ActiveWorkbook.Pat
-----------------------------------------------
~~ Message posted from
http://www.ExcelTip.com
~~View and post usenet messages directly from
http://www.ExcelForum.com
~~Now Available: Financial Statements.xls, a step by step guide to creating financial statements