XL 2016 Retrouver les voyelles ou les consonnes dans un mot

Do2B

XLDnaute Nouveau
Bonjour à tous,
Je cherche une formule qui me permette :
- De retrouver les voyelles présentes dans un mot.
- Chaque voyelle correspondant à un chiffre, je dois trouver la somme des chiffres correspondant aux voyelles présentes dans le mot.
Par exemple : DOMINIQUE = O+I+I+U+E = 6+9+9+3+5=32
32 est ce que je dois voir apparaître.
Je dois faire la même chose avec les consonnes.
Je cherche également une formule qui me permette de retrouver la première lettre d'un ensemble de mots (saisis dans des cellules différentes) et faire le même calcul.
Par exemple : A1 = DOMINIQUE, A2 = MARIE, A3 = CHARLOTTE D+M+C=4+4+3=11
11 est le chiffre qui doit apparaître.
Je ne sais pas si c'est réalisable, je ne suis pas une pro d'Excel.. Un grand merci à ceux qui pourront m'aider.
Dominique.
 

Modeste geedee

XLDnaute Barbatruc
Bonsour®
Bonjour à tous,
Je cherche une formule qui me permette :
- De retrouver les voyelles présentes dans un mot.
- Chaque voyelle correspondant à un chiffre, je dois trouver la somme des chiffres correspondant aux voyelles présentes dans le mot.
Par exemple : DOMINIQUE = O+I+I+U+E = 6+9+9+3+5=32
32 est ce que je dois voir apparaître.
Je dois faire la même chose avec les consonnes.
Je cherche également une formule qui me permette de retrouver la première lettre d'un ensemble de mots (saisis dans des cellules différentes) et faire le même calcul.
Par exemple : A1 = DOMINIQUE, A2 = MARIE, A3 = CHARLOTTE D+M+C=4+4+3=11
11 est le chiffre qui doit apparaître.
Je ne sais pas si c'est réalisable, je ne suis pas une pro d'Excel.. Un grand merci à ceux qui pourront m'aider.
Dominique.
:rolleyes: toubib;), à mon humble avis , une table de correspondance Lettre/chiffre serait une grande aide ...
 

Regueiro

XLDnaute Impliqué
Bonsoir le Forum, Do2B
Une Formule de Monique
VB:
=SOMMEPROD(SI(STXT(C5;LIGNE(INDIRECT(1&":"&NBCAR(C5)));1)={"A"."E"."I"."O"."U"."Y"};(MOD(CODE(STXT(MAJUSCULE(C5);LIGNE(INDIRECT(1&":"&NBCAR(C5)));1))-65;9)+1)*1))
Formule matricielle,
à valider pat ctrl, maj et entrée
 

chris

XLDnaute Barbatruc
Bonjour

Toujours de Monique l'addition de toutes les lettres
Code:
=SOMMEPROD((MOD(CODE(STXT(MAJUSCULE(A8);LIGNE(INDIRECT(1&":"&NBCAR(A8)));1))-65;9)+1)*1)

Je ne sais si la soustraction donne bien les consonnes : 53-32=21 (j'ai un peu oublié mes cours de numérologie...)

Pas besoin de valider en matriciel
 

Regueiro

XLDnaute Impliqué
Bonsoir Le Forum, Do2B, ERIC S
En PJ le fichier de ERIC S compléter selon tes Voeux
Son exemple est très simple Bravo

Bonne Nuit
Capture1.PNG
 

Pièces jointes

  • XLD numéro.xlsx
    162.6 KB · Affichages: 149

ERIC S

XLDnaute Barbatruc
Coucou Eric


Bonne année aussi à toi.
Comme je l'ai indiqué pas nécessaire de valider en matriciel.

Il reste néanmoins que sommeprod est une fonction matricielle, plus difficile à comprendre qu'un tableau qui sera limité à 26 lettres. Mais toutes les solutions sont bonnes pourvu qu'on ne les applique pas bêtement. Je vais d'ailleurs de ce pas fouiller les vôtres ;)
 

Modeste geedee

XLDnaute Barbatruc
Bonsour®
Bonjour à tous,
Je cherche une formule qui me permette :
- De retrouver les voyelles présentes dans un mot.
- Chaque voyelle correspondant à un chiffre, je dois trouver la somme des chiffres correspondant aux voyelles présentes dans le mot.
Par exemple : DOMINIQUE = O+I+I+U+E = 6+9+9+3+5=32
32 est ce que je dois voir apparaître.
Je dois faire la même chose avec les consonnes.
Je cherche également une formule qui me permette de retrouver la première lettre d'un ensemble de mots (saisis dans des cellules différentes) et faire le même calcul.
Par exemple : A1 = DOMINIQUE, A2 = MARIE, A3 = CHARLOTTE D+M+C=4+4+3=11
11 est le chiffre qui doit apparaître.
Je ne sais pas si c'est réalisable, je ne suis pas une pro d'Excel.. Un grand merci à ceux qui pourront m'aider.
Dominique.
une petite fonction personnalisée :
Attention ne pas utiliser d'accents...
VB:
Function numerologie(target As Range) As Integer
Dim x As Integer, i As Integer, cel As Range
If target.Count = 1 Then
        For i = 1 To Len(target)
                Select Case UCase(Mid(target, i, 1))
                Case "A"
                x = 1
                Case "U"
                x = 3
                Case "E"
                x = 5
                Case "O"
                x = 6
                Case "Y"
                x = 7
                Case "I"
                x = 9
                Case Else
                x = 0
                End Select
                numerologie = numerologie + x
        Next
Else
        For Each cel In target
        Select Case UCase(Left(cel, 1))
                Case "A", "J", "S"
                x = 1
                Case "B", "K", "T"
                x = 2
                Case "U", "C", "L"
                x = 3
                Case "D", "M", "V"
                x = 4
                Case "E", "N", "W"
                x = 5
                Case "O", "F", "X"
                x = 6
                Case "G", "P", "Y"
                x = 7
                Case "H", "Q", "Z"
                x = 8
                Case "I", "R"
                x = 9
                Case Else
                x = 0
                End Select
                numerologie = numerologie + x
        Next

End If
End Function
Capture.JPG
 

BACHIMONT

XLDnaute Nouveau
Bonjour à tous,
Je cherche une formule qui me permette :
- De retrouver les voyelles présentes dans un mot.
- Chaque voyelle correspondant à un chiffre, je dois trouver la somme des chiffres correspondant aux voyelles présentes dans le mot.
Par exemple : DOMINIQUE = O+I+I+U+E = 6+9+9+3+5=32
32 est ce que je dois voir apparaître.
Je dois faire la même chose avec les consonnes.
Je cherche également une formule qui me permette de retrouver la première lettre d'un ensemble de mots (saisis dans des cellules différentes) et faire le même calcul.
Par exemple : A1 = DOMINIQUE, A2 = MARIE, A3 = CHARLOTTE D+M+C=4+4+3=11
11 est le chiffre qui doit apparaître.
Je ne sais pas si c'est réalisable, je ne suis pas une pro d'Excel.. Un grand merci à ceux qui pourront m'aider.
Dominique.
Bonjour,

Ci joint une petite réponse
 

Pièces jointes

  • Numerologie.xlsx
    26.2 KB · Affichages: 11

Discussions similaires

Réponses
5
Affichages
889

Statistiques des forums

Discussions
314 485
Messages
2 110 101
Membres
110 663
dernier inscrit
ToussaintBug