Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 formule selon données

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

FCMLE44

XLDnaute Impliqué
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
 

Pièces jointes

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 ?
 
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
 

Pièces jointes

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
 
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.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
345
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…