If you run this piece of code first you should be OK. It checks to se
if the file already exists, and if so opens it, saves it withou
password protection, closes it then deletes it.

Not very elegant, but gets the job done.

If Len(Dir("filename")) 0 Then
Workbooks.Open "filename", writerespassword:="password"
ActiveWorkbook.SaveAs "filename", writerespassword:=""
ActiveWorkbook.Close
Kill "filename"
End I

--
langere
-----------------------------------------------------------------------
langerer's Profile: http://www.msusenet.com/member.php?userid=279
View this thread: http://www.msusenet.com/t-51196