Set Cancel to True, to cancel the the requested close process

Private Sub Workbook_BeforeClose(Cancel As Boolean)
     QUOTATIONCHECK.Show
     Cancel = True
End Sub