Try something similar to:

ActiveCell.Value = ActiveWorkbook.Name

--

Damon Longworth

2007 East Coast Excel / Access User Conference
April 18-20, 2007 - Providing Microsoft Excel training and Microsoft Excel
Classes
Atlantic City, New Jersey
www.ExcelUserConference.com/ECEUC.html

"Luc" wrote in message
...
What code do i need ?

Thanxxxxxxxxxxx

Luc

--------------------------------------------------------------------------------
Mijn Postvak In wordt beschermd door SPAMfighter
307 spam-mails zijn er tot op heden geblokkeerd.
Download de gratis SPAMfighter vandaag nog!