ActiveWorkbook
ThisWorkbook
Workbooks.Open(フルパス)
ブック.Close
ブック.Close SaveChanges:=False
ブック.Path
ブック.FullName
ブック.Name