Discussion :

[Plouf69]

Bonjours à tous,
Excusez moi pour le préambule un peu long :
Le but est de suivre une "usure" de cartouches de filtrations d'un compresseur de plongée.
Actuellement on utilise une feuille excel avec la saisie de l'heure system qd on commence à gonfler, puis dans une autre cellule l'heure system de l'arrêt, on calcul le temps d'utilisation dans la cellule suivante et enfin le cumul dans la dernière cellule. Les cellules ont pour format "[hh]\Hmm".
Dans 3 cellules à part on a le départ du cumul, le seuil d'alerte de changement et le seuil de changement impératif.
Un format conditionnel dans la colonne des cumuls basé sur la valeur par rapport aux seuils met les cellules de cumul en fond rose l'alerte et en rouge le changement impératif.
Tout cela marche, mais pour éviter une écriture sur la feuille directement (besoin de sécurité) j'ai développé du code avec un formulaire, l'écriture et les calculs fonctionnent, mais la ou je "patouile lamentablement" c'est que je n'arrive pas à fixer les seuils (exprimés en "[hh]:mm" dans des variables (pour pouvoir écrire les formules conditionnelles en Vba).
Alors que dans la feuille Excel j'additionne correctement 2297:05 + 00:07 par exemple (la première cellule est au format "[hh]:mm" la deuxième au format "[hh]\Hmm") par Vba je n'y arrive pas

Merci de me lire et de me mettre sur la piste.

[HabsWarrior]

Salut et bienvenu sur le forum.

Serais-t'il possible de nous fournir une copie de ton fichier afin de voir le code en question. J'ai ma petite idée, mais sans le code je pourrais t'envoyer dans le champs.

Merci!

[Plouf69]

>HabsWarrior
Merci de m'avoir lu (et répondu ),
Le fichier ?, j'envoie le classeur composé de :
- onglet(1) : "FormatCond03" (Amélioration de ce que mes collègues utilisaient pour leur permettre de tester les formats cond.)
- onglet(2) : "EssBaseDonnée" (la feuille dans laquelle le code écrit)
- onglet(3) : "Noms" (liste des personnes autorisée à modifier du code)

Le futur, un UserForm à onglets (Utilisation(1)-Maintenance(2) ), protéger les feuilles par Pass, changer de feuille après changement de cartouche, surveiller aussi d'autres seuils (courroies de transmission et d'autres pièces d'usures).

J'espère avoir été clair.
A+

[Plouf69]

Bonjour,
N'ayant pas trouvé de solution , j'ai continué mes investigations, et apporté des modifications au code, maintenant j'écris par VBa le format conditionnel à partir de valeurs écrites sur la feuille "EssBaseDonnée", ça fonctionne, j'ai révisé mon vB6 et donc j'ai essayé dans la fenêtre d'exécution divers façons d'entrer la valeur "2297:05" avec IsDate ou en encadrant de #, ça fonctionne pô
Merci de m'aider si possible, ou de me mettre sur une piste (Url | idées) si vous n'avez pas le temps de tester.