Programme clignote pour Nad-Dan
Salut Nad-Dan,
salut le forum,
Nad-Dan, j'imagine que tu te rappelles de ton programme de la cellule qui clignote. Ben, je n'arrive pas è l'adapter à mon fichier. Quels sont les paramètres à modifier?
Merci.
Salut le forum
Bon on va attendre les réponses de Nad et/ou Dan
Puisque que la question est pour eux !
Mytå
Bonjour,
Ta demande n'est pas claire.
Quel fichier, quels paramètres ? Que veux tu faire ?
Ce n'est pas le même souci qu'ici --> https://www.excel-pratique.com/forum/viewtopic.php?t=4484
A te relire
Dan
Salut Nad-Dan,
je parle exactement de ça. Je t'avais envoyé un fichier que tu m'avais retourné avec ton code installé pour qu'il fonctionne. Depuis, je n'arrive pas à le faire moi-même et je me demandais s'il y avait des paramètres modifiables ou si je ne faisais que copier le code et ensuite, ajuster la MFC. Parce que jusqu'à maintenant, juste copier le code du module et du workbook, je n'obtiens que des bugs à l'ouverture et è la fermeture de fichier.
Merci.
Bonjour à tous,
Erick, quand tu fais une demande d'aide, ne t'adresse pas à une seule personne en la nommant dans le titre du message ; tu risques de ne pas avoir de réponse (Dan et moi-même n'aurions pas dû être là aujourd'hui). Qui plus est, la macro n'est pas de nous.
Ce que j'ai constaté
Copier les macros
Mettre la cellule devant clignoter en condition VRAI avant de mettre la MFC.
Ensuite, on peut remettre la bonne valeur dans cette cellule.
Fais un essai et dis nous si c'est OK
Amicalement
Nad
Ok Nad,
je ne le ferai plus. Je m'habitue encore au us et coutumes de ce forum.
Pour ce qui est du problème de la macro, je bug sur les lignes en rouge :
Option Explicit
Dim vNow As Variant
Public Sub Eclairage()
vNow = Now + TimeValue("00:00:01")
Application.OnTime vNow, "Eclairage"
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage]
End Sub
Public Sub ArrêtEclairage()
Application.OnTime EarliestTime:=vNow, _
Procedure:="Eclairage", Schedule:=False
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1
End Sub
Merci pour ton aide.
Re
As-tu essayé ce que je te proposais dans mon précédent message ?
A te relire
Nad
Oui, à la lettre.
Mais je veux bien le refaire.
envoie le fichier que je teste également.
Nad
Quand j'ouvre mon fichier, ça me dit : Can't execute code in break mode.
Tu es en mode arrêt
https://www.excel-pratique.com/~files/doc/KkBONFeuille_de_temps_Piscines_Instech.zip
Voilà mon fichier. La MFC est en E10.
Je suppose que le bug vient de la version 2007 car j'ai copié ta feuille dans un nouveau fichier (sous 2003) et la macro tourne.
https://www.excel-pratique.com/~files/doc/Erick.xls
Nad
Bonjour, salut Nad,
En dehors du sujet, mais petite amélioration quand même :
En H23 : =MIN(40;SOMME(H10:H22))