Dim ExcelApp,ExcelBook 

 Set ExcelApp  = GetObject(,"Excel.Application")  '首先创建Excel对象

 If TypeName(ExcleApp) = "Application" Then      

  For Each ExcelBook In ExcelApp.WorkBooks       

   If ExcelBook.FullName = "C:\WINCC_Report\ExcelReport\WinccExcel_Day.xlsx" Then   '要访问的工作簿路径和名称

       ExcelApp.ActiveWorkbook.Save   '存盘

       ExcelApp.Workbooks.Close       '关闭工作簿：

       ExcelApp.Quit                  '退出 Excel

       Set ExcelApp= Nothing          '与变量所引用的对象相关联的内存和系统资源才被释放。当 Nothing 赋值给某对象变量后，此变量就不再引用任何实际对象

       Exit For 

   End If 

  Next 

 End If  

各位大神，这里有几句话我没有注释，帮我解释一下，我不明白，随便看一下我解释有没有错误，谢谢