Excel VBA - Workbook对象

Workbooks(1).Name
Workbooks(1).FullName    工作簿地址加名字
Workbooks(1).Path    工作簿地址
Workbooks(1).Close SaveChanges:=False    关闭工作簿，并且不保存
Workbooks.Open ThisWorkbook.Path & "\123.xlsx"    打开这个地址的文件
Workbooks(1).Save    工作簿保存
ThisWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\SaveAsWb.xlsm"    另存为文件
 WorkBook事件 

参考：http://msdn.microsoft.com/zh-cn/library/d4f0cb22%28v=VS.80%29.aspx