Exporting Access Data To Excel

Hi all,

I am using Access 97 & Excel 97 for this problem. I have a Access query which takes the contents of three tables and exports them to Excel. However, the query has now reach 69000+ records and increases by about 1000+ records ever month. So what I need to do is create as many WORKSHEETS within a single Excel WORKBOOK as necessary to accomodate all of my Access data. I have written a piece of code which will create seperate WORKBOOKS for each 65000+ of records but then what I want to do is code the almagamation of these WORKBOOKS into 1.

In short, after the first WORKBOOK is created I use code to make that the active WORKBOOK and then I want to import into that the other WORKSHEETS in the other WORKBOOKS.

I am using the folowing DIM's:

Dim X As New Excel.Application
Dim WkBook As Excel.WorkBook
Dim WkSheet As Integer
Dim ExcelSheet As Excel.Worksheet

ExcelSheet therefore is the current WORKSHEET within the Excel spreadsheet I want to import into.

Any advice on the command to perform a transfer of WORKSHEET data between Excel WORKBOOKS?

Regards,

DALIEN51