Export til Excel

Jeg bruger følgende når jeg skal overfører en forspørgsel til Excel.
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Forspørgsel", lDestinationFile, True

Er der noget tilsvarende til at overfører værdien fra en enkelt variabel?

http://www.mvps.org/access/modules/mdl0006.htm

http://www.mvps.org/access/modules/mdl0035.htm

Jeg fandt selv frem til følgende.

Dim lApp As New Excel.Application
Dim lDestinationFile As String
lDestinationFile = "C:\MinFil.xls"
lApp.Visible = True
lApp.Workbooks.Open lDestinationFile
lSheet = "Chart1"
lApp.Sheets(lSheet).Select
lApp.Sheets(lSheet).ChartTitle.Text = "Mintekst"

Det kan godt være at det er noget i stil med ovenstående link. Jeg har ikke fået nærlæst dem endnu.

Ellers tak for hjælpen.

well its using automation so there isnt that much difference!

og mange tak for points