Boa tarde
Essa macro fecha o livro onde ela esta inserida assim como todo e qualquer livro aberto. Como fechar apenas próprio livro?

Public bye As Boolean
Sub Save_Off()
Sheets("Acesso").Select
Ocultar
ActiveWorkbook.Save
Application.Quit
If Cancel = 0 Then
bye = True
End If
End Sub

Option Explicit
Sub Sair()
ThisWorkbook.Close
End Sub