Can someone help please, I am wanting to use the following but with some
extra code which saves it as EXCEL3 format so that it is compatible with MAC.

ThisWorkbook.SaveCopyAs "C:\Documents and Settings\" & GetUserName &
"\Desktop\" & "WYP_" & Range("D5").Value & ".xls"

Thanks in advance

Mark