Microsoft 365 Ecrire une formule de calcul en Vba Excel

[NONO14]

Bonjour à toutes et à tous,

Comment pourrait-on écrire cette formule de calcul en Vba, s'il vous plaît ? Pour le moment elle est écrite en dur dans des cellules Excel de mon tableau.
Cependant, il m'est demandé de l'écrire dans du code afin que personne ne puisse y accéder. Cette formule se trouve dans la colonne J du tableau de la feuille "Recap", il y en d'autres du même genre dans les colonnes K et L et un peu plus simples dans les colonnes M, N, O.
Bien sûr je pourrais protéger ces colonnes mais ce n'est pas ce qui m'est demandé, j'ai proposé cette solution, mais elle ne garantie pas une sécurité suffisante en cas d'effacement malencontreux par la personne qui va gérer ce fichier.
MAX_MAT et autres sont des Noms donnés à des cellules de la feuille "Données", soit les cellules L3 à O5.
Mot de passe de la feuille "falaise"
Merci par avance pour vos idées.

=SI(A2="";"";SI(A2<>"";SI(ET(D2<>"";E2<>"");E2-D2;SI(ET(D2<>"";E2="";F2<>"");MAX_MAT-D2;SI(ET(D2<>"";E2="";ET(F2<>"";G2=""));"";SI(ET(D2<>"";E2="";F2="";G2="";H2="";I2<>"");MAX_MAT-D2;SI(ET(D2<>"";E2="";F2="";G2<>"");MAX_MAT-D2;SI(ET(D2<>"";E2="";ET(F2="";G2="");ET(H2="";I2<>""));I2-D2;SI(ET(D2<>"";E2="";F2="";G2="");MAX_MAT-D2;SI(D2="";""))))))))))

 

[NONO14]

OK.



Pour moi, utiliser des caractères accentués dans les noms de variables, c'est potentiellement source de problèmes.

Oui je m'en suis rendu compte, à méditer pour la prochaine fois

 

[TooFatBoy]

Est-il possible de les cacher selon l'heure ? ça me paraît très compliqué...

Normalement il suffit de regarder l'heure au moment de l'ouverture du UserForm.

Le camarade vgendron qui a magnifiquement œuvré jusque là (puisque c'est lui qui a tout développé à 99,9 %) va bien t'écrire ça.


Au final il n'y aurait plus que deux CheckBox, et leurs TextBox associées, qui seraient visibles en fonction de l'heure de pointage et des trois tranches horaires.
Donc on en viendrait à ce que j'avais avancé il y a quelques temps : seulement deux informations "heure de pointage" et "entrée ou sortie" ?

 

[NONO14]

Normalement il suffit de regarder l'heure au moment de l'ouverture du UserForm.

Le camarade vgendron qui a magnifiquement œuvré jusque là (puisque c'est lui qui a tout développé à 99,9 %) va bien t'écrire ça.


Au final il n'y aurait plus que deux CheckBox, et leurs TextBox associées, qui seraient visibles en fonction de l'heure de pointage et des trois tranches horaires.
Donc on en viendrait à ce que j'avais avancé il y a quelques temps : seulement deux informations "heure de pointage" et "entrée ou sortie" ?

Non pas tout à fait. Si l'employé arrive pointe à 12h, il ne pourra plus utiliser les boutons du matin, s'il arrive après 19h, il ne pourra plus utiliser les boutons du matin et de l'après-midi.
Pour ce faire, je pensais faire une comparaison entre l'heure système et les heures butoirs qui sont enregistrées dans la feuille "Calcul" et sous les noms "MAX_DEB" pour 12h00 l'heure maximale d'arrivée , "MAX_DEB" pour 19h00 l'heure maximale de départ de l'après-midi.
Donc, dans mon petit cerveau, je fais cette déduction :
- Pour le matin si l'heure système est supérieure à 12h00 alors les boutons du matin sont cachés
- Pour l'après-midi si l'heure système est supérieure à 19h00 alors les boutons du matin et de l'après-midi sont cachés.
Tout ça paraît simple quand on l'écrit, mais à traduire en Vba c'est une autre paire de manche.

Sinon, j'ai quand même fais un peu plus que 0,01% du travail

 

[TooFatBoy]

Si l'employé arrive pointe à 12h, il ne pourra plus utiliser les boutons du matin, s'il arrive après 19h, il ne pourra plus utiliser les boutons du matin et de l'après-midi.

Donc s'il pointe à 12 h, il peut utiliser les boutons de l'après-midi et du soir ?

Pour ce faire, je pensais faire une comparaison entre l'heure système et les heures butoirs qui sont enregistrées dans la feuille "Calcul"

Oui, bien sûr.

Sinon, j'ai quand même fais un peu plus que 0,01% du travail

Oui, 10 fois plus. Donc en fait on est d'accord.
Mon pourcentage n'est peut-être pas 100 % exact, mais ce n'était pas une attaque envers toi mais un "hommage" à tout le travail effectué par le camarade vgendron.

 

[NONO14]

Donc s'il pointe à 12 h, il peut utiliser les boutons de l'après-midi et du soir ?



Oui, bien sûr.



Oui, 10 fois plus. Donc en fait on est d'accord.
Mon pourcentage n'est peut-être pas 100 % exact, mais ce n'était pas une attaque envers toi mais un "hommage" à tout le travail effectué par le camarade vgendron.

Oui s'il pointe à 12h00 les boutons de l'après-midi et du soir sont visibles. je sais cela peut paraître idiot et que rien n'empêchera un utilisateur de cliquer le soir alors qu'il n'ait que 14h00. Tu as certainement raison, je ne pourrais pas faire barrage à toutes les bêtises imaginables et inimaginables.
Eh bien, on va laisser le formulaire comme il est.

Pour ce qui est du travail de vgendron, je lui rends également hommage et je ne saurais comment le remercier davantage. J'ai conscience que sans son aide et celle de tout ceux qui ont apportés leur pierre à l'édifice je n'aurai pas réussi à sortir quelque chose d'équivalent.
Mes sincères remerciements à toutes et à tous

 

[vgendron]

hello !
je ne suis pas trop dispo depuis quelques jours, et pas mieux aujourd'hui
j'ai pas tout relu, mais si il y a une dernière question () je regarderai demain avec plaisir
et effectivement, non, je n'ai pas tout fait, contribué et guidé oui :-D

 

[ChTi160]

Bonjour le Fil
ces histoires d'horaires et de plages d'horaires ne sont pas évidentes à traiter
Tu as trois périodes "Matinée" "Après-Midi" et "Soirée"
quelles sont leur Limites .
quelles sont les périodes qui peuvent être définies .
exemple "Matinée" + "Après-Midi" exemple de "Journée" etc
y'a t'il des Limites pour Pointer exemple : le Matin de "8:00 à 9:00" soit 8:00 : 8;30 : 9:00
donc y a t'il plusieurs Limites en fonction du Pointage d'arrivée ! exemple le Matin "12:00 : 12:30 : 13:00
on pourrait ainsi sélectionner les heures en Fonction de l'arrivée (le départ étant en fonction de l'heure d'arrivée sélectionnée) "8:00 -->12:00" 8:30 -->12:30 etc
On aurait ainsi des Combobox renfermant des heures à sélectionner .
cordialement
jean marie

 

[TooFatBoy]

Tu as trois périodes "Matinée" "Après-Midi" et "Soirée"
quelles sont leur Limites .

Tu as la réponse dans le premier classeur de ce fil de discussion :

 

[ChTi160]

Re
merci TooFatBoy
fichier : "PointHeure15b"
Ces questions , car dans la feuille "Planning" , il y a des heures de début comme 6:30 : 8:00 pour une fin a 12:00
jean marie

 

[TooFatBoy]

merci TooFatBoy

De rien. En espérant que les horaires en question n'aient pas changé.

fichier : "PointHeure15b"

Ces questions , car dans la feuille "Planning" , il y a des heures de début comme 6:30 : 8:00 pour une fin a 12:00

Oui, ça dépend à quelle heure l'employé arrive réellement.
Mais les trois tranches horaires du tableau sont en fait trois tranches tarifaires différentes.

Il y a donc les heures de travail qu'il faut comparer aux heures des tranches tarifaires, pour payer justement l'employé, si j'ai bien tout compris.

C'est pour ça que je disais aussi que, pour moi, quand un employé pointe il suffit qu'il indique l'heure et s'il entre ou s'il sort. Le reste n'étant qu'affaire de calculs.

 

[ChTi160]

Re
Je pensais à un genre d'horaires aménagés.
Merci
Jean marie

 

[TooFatBoy]

Je pensais à un genre d'horaires aménagés.

Tout ce que j'en sais est ceci :

Microsoft 365 - Ecrire une formule de calcul en Vba Excel

Bonjour à toutes et à tous, Comment pourrait-on écrire cette formule de calcul en Vba, s'il vous plaît ? Pour le moment elle est écrite en dur dans des cellules Excel de mon tableau. Cependant, il m'est demandé de l'écrire dans du code afin que personne ne puisse y accéder. Cette formule se...

excel-downloads.com

 

[NONO14]

Re
merci TooFatBoy
fichier : "PointHeure15b"
Ces questions , car dans la feuille "Planning" , il y a des heures de début comme 6:30 : 8:00 pour une fin a 12:00
jean marie

Oui car l'heure la plus tôt d'arrivée du matin est 6h30 jusqu'à 12h00 maximale, l'après-midi peut commencer à 12h00 et finir à 19h00 et le soir commence à 19h00 et fini à 23h59, pour ne pas dire minuit. Si un(e) employé(e) commence à 15h30 et finit à 22h00, il y a donc une partie en après-midi et l'autre le soir, tout ça est une question de tarification (que je ne traite pas dans l'application) mais les heures doivent être bien séparées.

 

[NONO14]

hello !
je ne suis pas trop dispo depuis quelques jours, et pas mieux aujourd'hui
j'ai pas tout relu, mais si il y a une dernière question () je regarderai demain avec plaisir
et effectivement, non, je n'ai pas tout fait, contribué et guidé oui :-D

Hello !
Etant souffrant moi-même, je compatis. Prenez soin de vous.
Meilleure santé

 

[vgendron]

hello
non, je ne suis pas souffrant, juste pas dispo car absent :-D
la c'est bon, je suis de retour chez moi

et donc la.. tu en es où de ton fichier ?

hello @ChTi160 ,@TooFatBoy