XL 2016 Addition des nombres d'une date de naissance

Phillip

XLDnaute Occasionnel
Bonjour,

J'ai une question toute bête sans doute, mais qui me taraude. J'ai le bout de code ci-dessous qui extrait le mois et la date de naissance d'une cellule et fait la somme. Si cette somme est supérieure à limite (limite=22), alors je fais la somme des 2 chiffres.
Ex : 31/12/1999. Poste1NR=43, donc poste1= 4+3=7

VB:
Poste1NR = journ + moisn

If Poste1NR <= limite Then
Poste1 = Poste1NR
Else
Poste1 = Left(Poste1NR, 1) + Right(Poste1NR, 1)
End If

Et ça ne marche pas, ça me donne toujours 43...

Mystère ou ignorance du codeur ?

merci

Cordialement

Phillip
 

Modeste geedee

XLDnaute Barbatruc
Bonsour®
nombre mod 9 !!!
1605441315052.png
 

Statistiques des forums

Discussions
311 545
Messages
2 080 564
Membres
101 256
dernier inscrit
Ludmi