Macro, programmation...âme charitable... [Résolu]

magmag - 27 sept. 2017 à 21:09 - Dernière réponse :  Magmag
- 28 sept. 2017 à 17:59
Bonjour,

J'ai un classeur Excel dans lequel j'ai une feuille 2 qui correspond à une page d'aide de calcul. Je souhaiterais que les infos saisie dans ce tableau s'effacent (sans sauvegarde) à 05:10; 13:10 et 21:10 chaque jour sans modifier les case de formule et d'entête. Le problème que je rencontre c'est que je ne sais absolument pas comment faire!!! j'ai bien trouvé des codes mais je n'arrive pas a activer quoique ce soit...y aurait-il une âme charitable qui aurait la gentilles de me mettre ce code est cette macro en place directement dans mon fichier?

Par avance merci pour vos avis, aides et temps!


Afficher la suite 

6 réponses

Répondre au sujet
f894009 12537 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 28 sept. 2017 à 16:11
0
Utile
1
Bonjour,

05:10; 13:10 et 21:10
Ce fichier est ouvert 24/24 ou .....????
Bonjour f894009,

Non il n'est pas ouvert H24. Il est cependant ouvert regulièremet sur différents bureaux. C'est un fichier "aide" qui calcul des totaux de rejets mais qui doit être remis à 0 à chaque changement d'équipe.
Commenter la réponse de f894009
via55 8786 Messages postés mercredi 16 janvier 2013Date d'inscription 11 décembre 2017 Dernière intervention - 28 sept. 2017 à 17:01
0
Utile
1
Bonjour

Tu n'as pas joint ton fichier !

Poste un exemple de ton fichier sur cjoint.com, fais créer un lien que tu copies et reviens coller ici en indiquant précisément quelle plage doit être effacée

Cdlmnt
Via
Merci pour l'info :-) je me demandais comment vous faisiez pour partager vos fichiers....

Donc cette feuille Excel se trouvera en feuille 13 d'un classeur excel dont les 12 autres feuilles ne devront surtout pas être effacées. Dans ce tableau les cases blanches et vides doivent s'effacer à 5h10, 13h10 et 21h10 afin d'éviter toutes confusions. J'ai réussi à mettre en place une macro avec un raccourci clavier...mais un programmation est bien au dessus de mes compétences!

http://www.cjoint.com/c/GICpBdIrBPu

Merci pour votre aide.

Cdt.
Magmag
Commenter la réponse de via55
via55 8786 Messages postés mercredi 16 janvier 2013Date d'inscription 11 décembre 2017 Dernière intervention - 28 sept. 2017 à 17:52
0
Utile
1
Re,

Alors :

1) Dans This Workbook de l'éditeur VBA mettre la macro suivante :
Private Sub Workbook_Open()
Application.OnTime TimeValue("05:10:00"), "effacer"
Application.OnTime TimeValue("13:10:00"), "effacer"
Application.OnTime TimeValue("21:10:00"), "effacer"
End Sub


2) Inserer un Module et y mettre la macro suivante :
Sub effacer()
Sheets("nomdelafeuille").Activate
Range("D3:J19").ClearContents
End Sub


En remplaçant nomdelafeuille par le vrai nom de la feuille où effacer les données

Fermer le classeur puis le rouvrir (pour lancer la 1ere macro)
Évidemment cela ne fonctionnera que si le classeur est ouvert, par exemple si le classeur était fermé entre 12 h et 14h puis réouvert à 14h l'effacement de 13 h 10 n'aura pas pu avoir lieu et il faudra attendre 21 h 10

Cdlmnt
Via
MERCI BEAUCOUP VIA!!!
C'est super!!

Merci à tous pour le temps que vs avez eu la gentillesse de m'accorder.

Cdt.

Magmag
Commenter la réponse de via55