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]

Voici en détail ce que devront faire les actions de la Combo :
- Enregistrer un(e) employé(e) - UfGestTemps page 0 - Les autres pages sont enable
- Enregistrer un planning horaire - UfGestTemps page 1 - Les autres pages sont enable
- Enregistrer un contrat horaire - UfGestTemps pages 3 - Les autres pages sont enable
- Modifier un(e) employé(e) - Feuille Liste_agents
- Modifier un pointage - Feuille "Saisie"
- Modifier le planning - Feuille "Planning"
- Sauvegarder les pointages - Feuilles "Saisie" et "Recap"
- Editer les plannings - UfGestTemps page 2 - Les autres pages sont enable
- Editer les tableaux de pointages - Feuilles "Recap" et "Imp_Pointage"
- Feuille Calcul accès très restrictif réservé au chef, personne ne doit y avoir accès autre que lui.

Toutes les feuilles seront protégées par un mot de passe et la feuille calcul sera VeryHidden.
Voilà ce qu'il me reste à faire...

 

[vgendron]

au boulot alors

 

[NONO14]

voici le fichier sans les liaisons externes

au boulot alors

Eh oui. Je commence à en avoir ras la casquette.
Je ne saurais assez te remercier ainsi que les autres participants de m'avoir aider à créer cette application, c'est vraiment sympa de votre part à tous.

 

[NONO14]

Une petite dernière question : Est-ce que pour la combo, je peux utiliser le même principe que celle qui était présente avant en utilisant Case ?

 

[vgendron]

Une petite dernière question : Est-ce que pour la combo, je peux utiliser le même principe que celle qui était présente avant en utilisant Case ?

je dirais meme que tu as tout intérêt à reprendre le code..

 

[TooFatBoy]

Une petite dernière question

 

[NONO14]

Oui je sais que je risque de revenir vers vous... Je vais essayer de me débrouiller tout seul et si je n'y arrive pas, je viendrai toquer à votre porte.

 

[NONO14]

je dirais meme que tu as tout intérêt à reprendre le code..

Très bien merci pour le conseil

 

[NONO14]

J'ai codé la Combo de l'Uf GestMenus. J'ai supprimé le bouton "Valider" et il suffit à présent d'un click sur le choix pour le valider.
Est-il possible pour l'administrateur de ne taper qu'une seule fois le mot de passe pour accéder au formulaire ? J'ai posé une nouvelle question...
Je vous soumets mon travail, n'hésitez pas à me dire si cela ne convient pas.

 

[vgendron]

Est-il possible pour l'administrateur de ne taper qu'une seule fois le mot de passe pour accéder au formulaire ?

c'est exactement pour ca que je te disais qu'une fois le mot de passe admin rentré, il faut que TOUTES les pages du formulaire soient actives, pour que l'admin puisse accéder à toutes les pages sans avoir à fermer le formulaire et retaper son mdp pour réouvrir le USF sur une autre page..
c'est le principe du mode admin.. full access...==> et donc.. encore une fois.. la liste des actions est inutile..

 

[vgendron]

je ne comprend pas pourquoi tu veux (il veut) absolument avoir cette liste de choix qui limite la page d'accès..

genre, si l'admin ne selectionne pas une action au préalable, alors il ne sait pas ce qu'il vient faire sur le formulaire... c'est de l'alzeihmer très avancé..

 

[NONO14]

je ne comprend pas pourquoi tu veux (il veut) absolument avoir cette liste de choix qui limite la page d'accès..

genre, si l'admin ne selectionne pas une action au préalable, alors il ne sait pas ce qu'il vient faire sur le formulaire... c'est de l'alzeihmer très avancé..

Eh oui, j'ai eu beau lui expliquer... Il veut que ça se fasse comme ça. Vas comprendre la logique ou plutôt sa logique. Pour le moment il me fout la paix, c'est déjà ça de gagné.

 

[NONO14]

Est-il possible pour l'administrateur de ne taper qu'une seule fois le mot de passe pour accéder au formulaire ?

c'est exactement pour ca que je te disais qu'une fois le mot de passe admin rentré, il faut que TOUTES les pages du formulaire soient actives, pour que l'admin puisse accéder à toutes les pages sans avoir à fermer le formulaire et retaper son mdp pour réouvrir le USF sur une autre page..
c'est le principe du mode admin.. full access...==> et donc.. encore une fois.. la liste des actions est inutile..

Je n'ai pas le choix, il veut que les autres pages soient inaccessibles... Pourquoi ? ça je n'en sais rien. Il nous donnera des explications quand il présentera l'application.

 

[vgendron]

sinon
au bouton quitter, en plus de quitter, tu reload le formulaire de choix

 

[NONO14]

sinon
au bouton quitter, en plus de quitter, tu reload le formulaire de choix

Comment ça ? Je ne comprends pas ce que tu veux dire