Date qui limite l'utilisation et auto suppression [Résolu/Fermé]

Signaler
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
-
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
-
Bonjour à toutes et à tous
Je cherche une macro qui fait supprimer définitivement le fichier après une date bien définie est-il possible
Merci pour vos aides
Cordialement

1 réponse

Messages postés
12710
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 septembre 2020
2 026
Bonsoir

Un fichier ne peut pas se supprimer lui même
mais tu peux par macro effacer des feuilles
ex cette macro qui efface la feuille appelée Feuil2 le 29/9/2013 à l'ouverture du classeur

Private Sub Workbook_Open()
Application.DisplayAlerts = False
If Date = #9/29/2013# Then Sheets("Feuil2").Delete
Application.DisplayAlerts = True
End Sub

Cdlmnt
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
3
Bonjour,
Merci bien pour la réponse.
J'ai trouvé le bon code. je veux t'envoyer le fichier mais je ne sais pas comment faire dans ce site.
Dans cette macro c'est un peu près ce que tu m'a expliqué dans ta réponse, mais c'est pas le même code.
Messages postés
12710
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 septembre 2020
2 026
Bonsoir

Si tu as trouvé le bon code c'est parfait

Pour envoyer un fichier tu passes par https://www.cjoint.com/ et tu indiques le lien fourni dans un prochain message

Cdlmnt
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
3
Bonsoir
c'est le lien du fichier, je ne sais pas si j'ai bien réussi

https://www.cjoint.com/?CIDwNde8APO

Merci bien pour l'astuce "cjoint.com"
cordialement
Messages postés
12710
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 septembre 2020
2 026
je pense que ça devrait marcher mais je n'ai pas accès au code VBA que tu as protégé par un mot de passe ni à la feuille masquée donc je n'ai pu regarder
Messages postés
182
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
8 juillet 2020
3
Le code VBA n'est pas protégé, valider par OK de la fenêtre mot de passe sans rien taper
je t'envoie un fichier qui sera détruit en 2014

https://www.cjoint.com/?CIEaAaHTOIv

Bonne nuit