Microsoft 365 formule selon données

[FCMLE44]

Bonjour
Lorsque je sélectionne la donnée souhaitée en cellule B1 de la feuille "Sélection feuille", je souhaite faire la chose suivante
1- Rechercher dans la feuille "Paramètrage" en colonne A, la donnée inscrite en cellule B1 de la feuille "Sélection Feuille"
2- Je récupère les données de cette cellule B1 et les mets automatiquement dans les cellules concernées aux endroits indiquées en feuille "Feuille Calcul Indemnités"
3 - Mettre à jour des cellules selon ces données

Voir mon fichier explicatif en pièce jointe

Quelqu'un peut il m'aider SVP

Merci

 

[sousou]

Ll40,L44
Mais vérifie aussi 33,34,35,38,39....

 

[FCMLE44]

Il semblerait que ce ne soit pas les formules. En effet, le fichier de ton post #36 fonctionne mais quand je copie sur mon fichier def ca ne foncitonne plus

 

[FCMLE44]

Ou peut etre dans ces formules mais pour moi non

 

[FCMLE44]

Je n'y comprends rien. J'utilise le fichier que tu m'as envoyé en#36, ca fonctionne mais ma macro pour envoi mail ne fonctionne plus et si j'utilise mon fichier def, ta macro ne fonctionne pas mais macro pour envoi mail ok ?

Une idée ?

 

[FCMLE44]

Je viens de m'apercevoir que lorsque je sélectionne en D21 de la feuille salarié une info commençant par ICL ca fonctionne si je mets Ind..... alors débogage

 

[sousou]

On va reprendre tous cela, renvoi ta dernière version d fichier, et explique, j'ai pas compris ton dernier message

 

[FCMLE44]

En colonne A de la feuille CCN, tu as des termes qui commencent de manière différente soit ICL........ ou Ind Retraite.......

Lorsqu'en cellule D21 de la feuille salariés on sélectionne un terme commencant par Ind Retraite ca ne fonctionne pas

 

[sousou]

Pour ton outlook, qui ne fonctionne pas avec mon fichier, c'est parce que pour faire tourné ton appli chez moi, je n'ai pas la bibliotheque outlook 16.0 (bibliotheque manquante), donc j'ai décoché cette dernière. (utilises ton fichier)
Ajoute ce dernier morceau de code:
Sélectionne toute les formules à tester dans la feuille cnn, et lance le code.
Il t'affichera les numéro de lignes ou il trouve une erreur de formule.
le principe, est de copier la formule dans la case d59 de la feuille indemnités, pour voir si excel comprend ta formule
Sub test()
For Each i In Selection
If i <> "" Then phrase = Right(i, Len(i) - 1) Else phrase = ""
On Error Resume Next
Sheets("indemnités").Range("D59").FormulaLocal = phrase
If Err.Number <> 0 Then MsgBox i.Row
On Error GoTo 0
Next
End Sub

 

[FCMLE44]

J'ai copié une formule qui ne fonctionnait pas dans la cellule D59 de la feuille indemnités
J'ai mis ce code sur un nouveau module
Voici le message d'erreur

 

[sousou]

D'après mes test les lignes en erreur sont:
19,23,40,44
19:
"=MAX(Indemnités!$E$41;Indemnités!$E$44);0)*5
Correction: "=MAX(Indemnités!$E$41;Indemnités!$E$44;0)*5
23:
"=MAX(Indemnités!$E$41;Indemnités!$E$44);0)*8
"=MAX(Indemnités!$E$41;Indemnités!$E$44;0)*8
40:
"=MAX(Indemnités!$E$41;Indemnités!$E$44);0*5
"=MAX(Indemnités!$E$41;Indemnités!$E$44;0)*5
44:
"=MAX(Indemnités!$E$41;Indemnités!$E$44);0*8
"=MAX(Indemnités!$E$41;Indemnités!$E$44;0)*8
Toujours la même erreur! dans ces formule il n'y a pas de si.

 

[FCMLE44]

Et oui c'était cela. Je pensais avoir corrigé les bonnes erreurs
Désolé et Merci

 

[sousou]

 

[FCMLE44]

Vue!!
et comme ceci

Bonjour
J'aimerais y rajouter une variante
Lorsqu'en colonne B la phrase commence par MAXi...... alors cette formule en colonne D s'affichera en ligne 66 de la feuille Indemnité

Comment peut on faire ?

 

[FCMLE44]

Pas d'idée ?

 

[sousou]

Bonsoir
Absent quelques jours.
Regarde si c''st ca