VB和EXCEL的问题

Public xlapp As Excel.Application
Public xlworkbook As Excel.Workbook
Public xlworksheet As Excel.Worksheet
Set xlapp = New Excel.Application
xlapp.Workbooks.Add 文件名
Set xlworkbook = xlapp.Workbooks(1)
Set xlworksheet = xlworkbook.Worksheets(1)
'修改数据
xlworksheet.SaveAs '保存设置
xlapp.Quit
Set xlapp = Nothing