Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) if UnloadMode=vbFormControlMenu Cancel = 1 'Annule la fermeture end if End Sub
'rien à coder, la form le fait toute seule
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question