Provando con:

ThisProject.SaveAs Name = "prova.xls", pjXLS

appare il wizard ma pare che alla fine non crei il file...