Recherche dans répertoire

malinsard

XLDnaute Junior
Bonjour à tous,
J'ai créer une feuille de poste qui regroupe des tâches journalière.
Ma question est-il possible de faire une recherche dans le répertoire de sauvegarde avant la remise à zéro si il y a déjà une sauvegarde à la date du jour.
J'explique j'ai Mathieu il veut fermer sa feuille mais pas de sauvegarde encore faite, ce que j'aimerai c'est un message du style, "Pas de sauvegarde pour Mathieu le (date du jour). A la suite de ça il devra faire sa sauvegarde pour pouvoir faire la remise à zéro.
J'espère avoir été assez claire dans mes explications, au besoin je pourrez fournir la feuille.
Merci à tous de votre aide.
 

Jacky67

XLDnaute Barbatruc
Bonjour,
Ceci placé dans le thisworkbook du classeur en question:
1-Permet la fermeture du classeur si aucune modification n' a été faite
2-Demande de sauvegarder si une modification à été faite
3- Empêche la fermeture si la sauvegarde n'est pas effectuée
Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not ActiveWorkbook.Saved Then
  If MsgBox("Ce classeur à été modifié et non enregistré" & vbLf & "Voulez-vous l'enregistrer ?", 292, "Information") = 6 Then
    ThisWorkbook.Save
  Else
    Cancel = True
  End If
End If
End Sub
 

Discussions similaires

Réponses
10
Affichages
186

Statistiques des forums

Discussions
312 175
Messages
2 085 953
Membres
103 058
dernier inscrit
florentLP