Closing a workbook in VBA

[cgclower]

OK, I can get VBA to open a workbook, but I can't seem to get it to close the workbook. What am I doing wrong?

Workbooks.Open NewerFile

opens the workbook perfectly, but neither of these work to close it:

Workbook.Close NewerFile

Workbooks(NewerFile).Close

Thanks for the help!

 

[pedie]

activeworkbook.close savechanges:= true ' or false

 

[cgclower]

Cool, that works!

Any way to close it without making it be the active workbook?

Thanks in advance!

 

[pedie]

to close the workbook you are running this vba from

Thisworkbook.close savechanges:= true

 

[shg]

Assuming NewerFile includes the path, you don't use that when closing (or referring to) a workbook.

An easy way is to set an object variable:

Sub x()
    Dim wkb         As Workbook
 
    Set wkb = Workbooks.Open(NewerFile)
    ' ...
    ' process as desired
    ' ...
    wkb.Close SaveChanges:=True    ' or False, as appropriate
End Sub

 

[strategygamer]

filedir = "c:\my documents\"
myfile = "excel file.xls"
workbooks.open filedir & myfile
'do stuff
workbooks(myfile).Close