Nombre de valeur dans une cellule

  • Initiateur de la discussion Initiateur de la discussion fb40
  • Date de début Date de début

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 !

F

fb40

Guest
Bonjour,

comment faire pour savoir combien de valeur j'ai rentré dans une cellule.
Par exemple en A1 je tape = 10+20+30 et je voudrai qu'en A2 cela me dise 3 chiffres.

Par avance merci.
fb40
 
Salut fb40,

Je ne crois pas que cela soit possible.

Par contre, si tu tapes 10 en A1, 20 en B1, 30 en C1, =somme(A1:C1) en D1, la formule =NB(A1:C1) en E1 te donnera le résultat recherché

Ândré
 
salut

voila une formule qui permet d'en trouver 3

=SI(ESTERREUR(CHERCHE("+";A1;1));1;SI(ESTERREUR(CHERCHE("+";A1;CHERCHE("+";A1;CHERCHE("+";A1;1)+1)));2;3))

si t'n veux plus, il faut dupliquer
bon courage
 
Bonjour fbfourty, et le forum

Voilà une 'tite macro qui devrait faire l'affaire :

NbNum = 0
toto = ActiveCell.Formula
Chaine = CStr(toto)
For Boucle = 1 To Len(Chaine)
Car = Mid(Chaine, Boucle, 1)
If IsNumeric(Car) = False Then NbNum = NbNum + 1
Next Boucle

BipBip.gif
 
Merci pour vos réponse.
J'ai voulu essayer la macro de Cathy mais cela ne marche pas ou alors que je ne sais où la mettre et comment faire. J'avoue que je suis un peu perdu.
Mille excuse et merci d'avance pour votre aide.
 
Ah je vois, voilà le fichier avec la macro.

J'ai compté le nombre de caractères non numériques, mais on peut se limiter au +

dans ce cas
If IsNumeric(Car) = False Then NbNum = NbNum + 1

deviendrait
If Car ="+" Then NbNum = NbNum + 1

BipBip.gif
 

Pièces jointes

C'est exactement cela que je veux. Merci...mais je vais être encore un peu pénible. Je voudrais appliquer cettre macro pour plusieurs ligne. En effeit dans mon tableau j'ai une trentaine de ligne (de A1 à A30 et cela peut augmenter) et je voudrais le résultat obtenu avec la macro juste à coté (de B1 à B30). et si possible, est-ce que la macro peut s'éxécuter automatiquement.
Par avance merci.
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Retour