Bonjour les amis (es),
dans le fichier ci-joint j’archive des traces de formulaires.
J’aurai voulu faire en sorte de pouvoir supprimer les lignes entières avec les dates de plus de 5 jours basées en colonne D.
Soit avec le bouton bleu en haut à droite sur l’onglet, soit à l’ouverture du fichier.
J’avais essayé un code qui se trouve dans le module 1 mais il ne fonctionne pas.
Auriez-vous la gentillesse de m’aider sur ce point.
Je vous remercie d’avance.
Cdt Rubis
FORMULAIRES.xlsm (18,2 Ko)
Bonjour tontonbox,
IMPECCABLE. Peut-on mettre ce code aussi dans le thisworkbook de façon qu’il fasse la suppression lors de l’ouverture ?
Et si oui, je place le code uniquement de cette façon : SuppDate ou alors avec Call ?
Re
C’est pas trop ma spécialité les macros mais tu peux éventuellement faire un truc comme ça!
FORMULAIRES (2).xlsm (15,7 Ko)
Cordialement
Re,
Merci c’est pas grave. Ce que tu as fais me va tres bien.
A bientot.
Cdt Rubis
Bonsoir Mimi,
alors ton code c’est nickel !
Je crois que tu m’avais déjà écris un code du genre, mais je n’ai pas beaucoup de temps pour tout rechercher.
Par contre si je place le petit code dans le Thisworkbook; rien ne se passe !
Alors c’est vrai dans le Thisworkbook de mon fichier réel, c’est un peu mélangé je crois !
Peut-être je l’ai mal placé.
Je l’ai mis ici dans le fichier pour que tu puisses mieux voir, même si ce n’est pas le vrai fichier, mais peut-être tu peux me dire si tout est bien placé, si tu veux bien.
Lorsque j’ouvre mon fichier principal tout à l’ir de fonctionner sauf qu’il n’éxécute pas ton code « SuppDate »
Merci à toi.
A+
Rubis
Classeur1.xlsm (13,8 Ko)
Re,
Oui, mais si tu ne places pas la macro(SuppDate) qui se trouve dans le module, sur ton fichier,
C’est normal
Suppdate est le nom de la macro à lancer
De plus ne pas oublier de modifier le nom de l’onglet dans la macro
Set Ws = Sheets(« DOC INT ») —> Set Ws = Sheets(« Rdv »)
Re,
tout cela je l’ai fais. Mais pour l’instant aucune action!
Je regarderai ce soir .
Je te tiendrai informé.
A+
Re,
cela ne me laisse pas tranquille !
Je ne trouve pas l’erreur !
Je t’ai mis le tableau et les codes et rien ne se passe !
De même que dans mon fichier réel, les boutons filtres du tableau disparaissent tout le temps et plus moyen de les afficher.
TEST.xlsm (53,4 Ko)
Bonjour Mimi,
Merci pour cette révision et modification. Maintenant tout fonctionne.
J’ai modifié la macro pour les RDV aussi vu qu’elle est identique à celle-la.
Heureusement que tu es la ! 
Du coup je peux même pas cocher le résolu pour ton travail. Désolé.
OUPS ! ah si j’ai pu coché le résolu pour toi.
Bonne journée et à bientôt
Amicalement Rubis
Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.