sUsername=Inputbox("Please supply your user name")

--
HTH

-------

Bob Phillips
... looking out across Poole Harbour to the Purbecks


"Douvid" wrote in message
...
ok bob and how do I have to declare the variable that
will insert the user name ? this causes me problems

-----Original Message-----
Douvid,
try

ThisWorkbook.SaveAs "D:\The Documents and Settings/"
& <user name &
"/Application Data/Microsoft/AddIns"

watch for wrap-around.


--
HTH

-------

Bob Phillips
... looking out across Poole Harbour to the Purbecks


"Douvid" wrote in message
...
HI,
I need to use an inputbox to get the user name of the
user
and then save the workbook to a specific location. This
location where I need to reinsert the user name as a
variable. I try this but something is wrong with the
argument. I haven't succeed to writte the synthaxe to
insert my variable in the location.
Thanks for your advices
Application.ThisWorkbook.SaveAs D:\The Documents and
Settings/<user name/Application Data/Microsoft/AddIns




.