如何使用业务对象创建和编写excel文件？

Question

我尝试创建并编写excel文件，我可以放置所有数据： 我使用这段代码：

 Set xlApp = CreateObject("Excel.Application")

            ActiveWorkbook.SaveAs Filename:=Path.XLS

            xlApp.Visible = True

但它不起作用！