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

Messages postés
159
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
31 août 2019
- - Dernière réponse : delta70
Messages postés
159
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
31 août 2019
- 30 sept. 2013 à 00:28
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
Afficher la suite 

1 réponse

Messages postés
11085
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
15 septembre 2019
1414
0
Merci
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
delta70
Messages postés
159
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
31 août 2019
-
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.
via55
Messages postés
11085
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
15 septembre 2019
1414 -
Bonsoir

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

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

Cdlmnt
delta70
Messages postés
159
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
31 août 2019
-
Bonsoir
c'est le lien du fichier, je ne sais pas si j'ai bien réussi

http://cjoint.com/?CIDwNde8APO

Merci bien pour l'astuce "cjoint.com"
cordialement
via55
Messages postés
11085
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
15 septembre 2019
1414 -
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
delta70
Messages postés
159
Date d'inscription
mercredi 26 janvier 2011
Statut
Membre
Dernière intervention
31 août 2019
-
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

http://cjoint.com/?CIEaAaHTOIv

Bonne nuit