Create an Excel file, enter some data and save the file through VB scripting

January 15, 2010

Dim objexcel
Set objExcel = createobject("Excel.application")
objexcel.Visible = True
objexcel.Workbooks.add
objexcel.Cells(1, 1,1).Value = "Testing"
objexcel.ActiveWorkbook.SaveAs("d:\exceltest.xls")
objexcel.Quit

You Might Also Like

0 comments