dxDBGrid1.SaveToXLS(savedialog1.FileName+'.xls',true);导出的数据，数字为文本类型

dxDBGrid1.SaveToXLS(savedialog1.FileName+'.xls',true);导出的数据，数字为文本类型用excle宏录制的如下，可以提示xlDelimited未定义,xlTextQualifierDoubleQuote未定义，是不是要引用什么
ExcelApp.range['D:D'].TextToColumns(ExcelApp.range['D20'], DataType:=xlDelimited,TextQualifier:=xlTextQualifierDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True,        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo  :=a, TrailingMinusNumbers:=True);