Access2010クエリーのExcel出力書式
Access2010で作成したクエリーをそのままの書式でEXCELに出力するVBAを組みたいと思っています。VBAは下記のとおり書いてみましたが、クエリーで表示される書式（ある列はカンマ、ある列は日付形式など）をそのまま移すことができません。このVBAをどのように変更したら、クエリーそのままの書式で出力できますでしょうか？
'''''QUERYを指定
Dim varQE1 As Variant
varQE1 = "QE1_List" 'QUERY名
'''''日付つきファイル名を指定
Dim varExcelPass As Variant
varExcelPass = "C:\List_" & Format(Now(), "yyyymmdd") & ".xls"
'''''ファイル変換出力
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, varQE1, varExcelPass, True
