have you tried a simpler approach by simply creating 2 queries equivalent to your 2 recordsets (name them Blatt1, Blatt2), then export them to the same workbook using the TransferSpreadsheet method, this will create a workbook with 2 worksheets named Blatt1, Blatt2, then you can go about trying...