Use Macro to export excel

laujerry — Tue, 29 Jul 2014 16:30:44 GMT

I want to export objects to different excel sheet

I know there is an excellent from Stefan but I have not yet got an understanding

So just want to ask about the following code

Why, if I replaced the SaveAs path with an xls extension, will the file fail to be recognized as a proper xls format?

Warning like "The file you are trying to open is in a different format than specified by the file extension..."

Set xlobj = CreateObject("Excel.Application")

xlobj.DisplayAlerts = false

Set wrkbook = xlobj.Workbooks.Add

Set newwrksht = xlobj.Application.Worksheets.Add

wrkbook.SaveAs "C:\test.xls"

Thanks

Re: Use Macro to export excel

laujerry — Wed, 30 Jul 2014 02:36:25 GMT

I got it already, you need to define the file format as 56 for xls

wrkbook.SaveAs "C:\test.xls", 56