This will transfer the contents of the two queries to two worksheets in the one workbook.
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qryYourQueryName1", "PathName.xls", True, "WorkSheetName1"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qryYourQueryName2", "PathName.xls", True, "WorkSheetName2"
David