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

Signaler
Messages postés
185
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
6 octobre 2020
-
Messages postés
185
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
6 octobre 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
12868
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
29 novembre 2020
2 076
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
185
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
6 octobre 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
12868
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
29 novembre 2020
2 076
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
185
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
6 octobre 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
12868
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
29 novembre 2020
2 076
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
185
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
6 octobre 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