XL 2019 Poser une addition pour reduire les resultats

Azrael83260

XLDnaute Nouveau
Bonjour à tous !

Je suis nouveau sur ce forum et vous remercie déjà par avance de votre accueil et du temps que vous m'accorderez.
Voilà mon "problème": j'aimerai pouvoir poser des additions dans excel ( jour de naissance + mois de naissance + année de naissance) avec les retenues qui vont avec bien sur haha.
A partir du résultat obtenu je voudrais le réduire d'abord à 2 chiffres puis à un chiffre sauf 2 cas particuliers si le "R2" correspond à un 11 ou 22.

Exemple :

02
+ 02
+ 1990
-----------
1994 (R1)
------------
23 (1+9+9+4) (R2)
-------------
5

J'espère que mes propos sont compréhensibles mdr !
Merci encore pour votre aide :)
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Azrael, et bienvenu(e) sur XLD,
Un essai en PJ avec une fonction perso :
Code:
Function Calc(T0)
Add1 = "D" & Year(T0) + Month(T0) + Day(T0)    ' Add1 est une chaine plus simple à traiter ensuite
Add2 = "D" & Val(Mid(Add1, 2, 1)) + Val(Mid(Add1, 3, 1)) + Val(Mid(Add1, 4, 1)) + Val(Mid(Add1, 5, 1))
If Add2 <> "D11" And Add2 <> "D22" Then
    Calc = Val(Mid(Add2, 2, 1)) + Val(Mid(Add2, 3, 1))
Else
    Calc = Val(Mid(Add2, 2))
End If
End Function

et aussi par calcul, mais j'ai pris plusieurs colonnes.
 

Pièces jointes

  • Classeur1.xlsm
    20.4 KB · Affichages: 9
Dernière édition:

Azrael83260

XLDnaute Nouveau
Bonjour
Bonjour Azrael, et bienvenu(e) sur XLD,
Un essai en PJ avec une fonction perso :
VB:
Function Calc(T0)
Add1 = "D" & Year(T0) + Month(T0) + Day(T0)    ' Add1 est une chaine plus simple à traiter ensuite
Add2 = "D" & Val(Mid(Add1, 2, 1)) + Val(Mid(Add1, 3, 1)) + Val(Mid(Add1, 4, 1)) + Val(Mid(Add1, 5, 1))
If Add2 <> 11 Or Add2 <> 22 Then
    Calc = Val(Mid(Add2, 2, 1)) + Val(Mid(Add2, 3, 1))
Else
    Calc = Val(Mid(Add2, 2))
End If
End Function

J'ai testé mais je n'ai pas trouvé de date dont le calcul fait 11 ou 22

Bonjour Sylvanu et merci pour votre aide
J'aimerai pouvoir avoir l'opération posée car j'ai des interprétations issues de la première réduction
voici un exemple de 11 : 14.09.1995 = 2018 = 11