Stop pop-up when excel closes

[CBrine]

Daxton,
I did something close to yours. I set the saved flag to true, then excel will not prompt you to save and the application.quit will bypass the save. So if you want to not save the activeworkbook, you might want to try this. It will save each open workbook, except for the workbook that the code is executed on, prior to closing excel.

Private Sub CommandButton1_Click()
Dim wb As Workbook, wb2 As Workbook
Set wb = ActiveWorkbook
For Each wb2 In Application.Workbooks
    If wb2.Name = wb.Name Then
        wb2.Saved = True
    Else
        wb2.Save
    End If
Next
Application.Quit
End Sub