I think I found one error

bk.SaveAs Filename:=Folder & TEO_Appx_No_2.xls.Value

You can't have a period in this line befroe the XLS.

Excel will not let you put a period in the Textbox Name. I just tried
and it gave me an error. Try the code without the last SaveAs
statement.

You want to create a string like this


FName = "Spec " & TEO_No_1.vales & _
CLLI_Code_1.value & " " & _
CES_No_1.value & " " & _
TEO_Appx_No_2.value & ".xls"
bk.SaveAs Filename:=Folder & FName


Notice I put spaces between each of the entires. I have a space at the
end of "Spec "


--
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=165141

Microsoft Office Help