Application.Quit закрывает все Excel открыть windows, я хочу закрыть только текущее окно
Application.Quit
Public Function CloseFile() Application.Quit End Function