print ADO recordset in Excel

B

BillyRogers

Instead of Debug.Print rst.fields(0)
how can i open a new Excel workbook and print the field in the first cell?


--
Billy Rogers

Dallas,TX

Currently Using Office 2000 and Office 2003
 
B

Barry Gilbert

Try this:

Dim xlApp As New Excel.Application
xlApp.Workbooks.Add
xlApp.Workbooks(1).Worksheets(1).Range("A1") = rstFields(0)
xlApp.Visible = True

Barry
 
Top