Darren, I can't find a direct VBA method of just saving a single sheet as an Xls workbook.
You could save the whole workbook and then delete the other sheets.
You cold save the current workbook as it is, then delete the unneeded sheet and save it again with the new name.
You could open a new workbook and copy the sheet to it and then save it.
Or you could when on the correct sheet save it as a .csv file, which can be opened by excel. It only saves the sheet that you are on and you should be in cell A1 when you save it.
ps this sounds like it should be an Access database.