Ciao ghiboz, tanto per concludere il discorso, se vuoi puoi utilizzare il sottoriportato ciclo che controlla se i files sono salvati e chiude il prog.:
codice:
Sub Verifica()
Dim yForm As Form
Dim strFrmAtt As String
' Verifica che i file siano stati salvati e chiude le
' Frm Attive - Modulo ConfSalva:
For Each yForm In Forms
strFrmAtt = yForm.Name
Select Case strFrmAtt
Case "FrmAnagClienti"
If blVerifica1 = False Then
' Chiama Salva nell'apposito Modulo:
Call ConfermaSalva
Else
FrmAnagCliente.WindowState = vbMinimized
Unload FrmAnagCliente
Set FrmAnagCliente = Nothing
End If
'Case ....
End Select
Next yForm
FrmMAIN.WindowState = vbMinimized
Unload FrmMAIN
Set FrmMAIN = Nothing
End Sub