Probleme thisworkbookbeforclose

Bonsoir,

Je seches lamentablement devant les propriétés de thisworkbook, pourtant celà me parraissait simple en lisant les tutos et les différentes aides sur le sujet mais voilà je n'aboutis à rien.

Pour faire simple j'aimerai à la fermeture, si les worksheets du classeur n'ont pas été modifier, fermer directement sans sauvegarde, parcontre si il y a eu modification des worksheets, j'aimerai par sécurité reverrouiller mon classeur, puis demander la confirmation de sauvegarde à l'utilisateur.

Du coup mon code donne

Private Sub Workbook_BeforeClose(Cancel As Boolean)

If Me.Saved = False Then
   locked_quit 'ferme le menu moderateur et verrouille les onglets
Else
    ActiveWorkbook.Close False
End If
End Sub

A chaque fermeture il me lance quand meme le verrouillage

si vous avez une petite idée je suis preneur

edlede

Bonjour,

Normalement :

Else
    Cancel=True
End If

pour annuler l'événement.

mais là tu n'as même pas besoin du Else puisque si la sauvegarde n'est pas nécessaire il va fermer directement.

eric

Merci eriic mais le problemme persiste,

il lance systématiquement le verrouillage meme si les worksheets n'ont été que consultés

j'ai essayé quelques chose comme ca

Private Sub Workbook_BeforeClose(Cancel As Boolean)

If Not ActiveWorkbook.Saved Then

locked_quit 'ferme le menu moderateur et verrouille les onglets

End If

End Sub

mais c'est toujours pareil il lance systématiquement ma macro de verrouillage

Pas chez moi.

C'est que tes macros font des modifs et changent le .Saved