Yeah, that kinda confirms what I believed. I think the constant "Type:=xlTypePDF" was introduced in Excel 2007. It runs smoothly on my excel and I have excel 2007. Someone else with xl2007 can run my sheet and confirm to us that it runs smoothly not only on my PC. Did you try it on xl2007 roki4? Did it worked on that version?

Now, I think that you will have to do the inevitable and try to upgrade early. I know many people resit upgrading to excel 2007/2010, but sooner or later it will be necessary.

I suggest two things.
1. Record a macro using your version of XL trying to save the sheet as PDF and replace everything with the exception of the Filename constant part.
2. If your excel cannot support that, then open a new thread and refer to this thread as necessary asking for help in modifying the part that saves the sheet as PDF.