Как закрыть приложение Excel из VB без сохранения изменений?

Option Explicit
Private appExl As Excel.Application
Private wbItems As Excel.Workbook
 
Public Sub ExitExcel()
    If Not wbItems Is Nothing Then
        wbItems.Close SaveChanges:=False
        Set wbItems = Nothing
    End If
    
    If Not appExl Is Nothing Then
        appExl.Quit
        Set appExl = Nothing
    End If
End Sub