VBA to name, save and close a file

[scrabtree23]

I have the code below. What I want it to also do, is close the file. ?


Private Sub cmbComplete_Click()

usfFinished.Hide

Dim dt As String, wbNam As String
wbNam = "EmpSatSur"
dt = Format(CStr(Now), "yyyymmddhhmmss")
ActiveWorkbook.SaveAs Filename:=wbNam & dt
End Sub

[Mumps1]

Add

Please Login or Register  to view this content.

after the "SaveAs" line.

[scrabtree23]

This is saving it in the "Documents" folder. I would prefer it to save in its present location. Any help with that?

[Mumps1]

Please Login or Register  to view this content.