Come ti dicevo ... utilizza la QueryUnload

Qualcosa come

codice:
    If UnloadMode = vbFormControlMenu Then
        FormX.Show
        Cancel = True
    End If