代码如下:Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True objExcel.Workbooks.Add objExcel.Cells(1, 1).Value = "Test value"