Creating empty excel file

'create an empty excel file starts

strFileName = "C:\Users\ARUN\Desktop\LD.xlsx"

Set objExcel = CreateObject("Excel.Application")

objExcel.Visible = True

Set objWorkbook = objExcel.Workbooks.Add()

objWorkbook.SaveAs(strFileName)

objExcel.Quit

'created an empty excel file

' later if you want to open

objExcel.workbooks.open(strFileName)