Formule besion d'aide si possible

Bonjours à vous tous

Je suis à la recherche du formule mais la qui dépasse mes compétence

Tout est expliqué sur le fichier joint

Merci de votre précieuse aide comme habitude

16formule.xlsx (9.15 Ko)

Bonjour

en B1 j'ai mis cela

=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;"p";"+");"p";"+");"p";"+")

le second et le troisième p et + tu peux modifier

Celui là pour la B1 en direct :

=SUBSTITUE(A1;"p";"+")

bon Dim

Crdlt,

André

Andre13 a écrit :

Bonjour

en B1 j'ai mis cela

=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;"p";"+");"p";"+");"p";"+")

le second et le troisième p et + tu peux modifier

Celui là pour la B1 en direct :

=SUBSTITUE(A1;"p";"+")

bon Dim

Crdlt,

André

merci de ta réponse mais cela me donne pas le resultat ce que je cherche a faire c'est le total 3+2+7+2+3/5=3.4 comment puis je faire svp merci

Bonsoir,

Pour la moyenne de la somme des nombres séparés par des "p", on peut faire une fonction personnalisée :

Function MOYP(vp As String)
    Dim txp, n%, i%
    txp = Replace(Replace(vp, " ", ""), "P", "p")
    txp = Split(txp, "p")
    n = UBound(txp) + 1
    If txp(n - 1) = "" Then n = n - 1
    For i = 0 To UBound(txp)
        If txp(i) = "" Then txp(i) = 0
    Next i
    txp = "=(" & Join(txp, "+") & ")/" & n
    MOYP = Evaluate(txp)
End Function

qui s'utilisera comme toute autre fonction d'Excel (à placer dans un module standard).

Je n'ai par contre rien compris au traitement des autres valeurs littérales, au résultat à obtenir et au type de données du résultat (texte ou nombre). Il faudrait donc être plus explicite.

Cordialement.

MFerrand a écrit :

Bonsoir,

Pour la moyenne de la somme des nombres séparés par des "p", on peut faire une fonction personnalisée :

Function MOYP(vp As String)
    Dim txp, n%, i%
    txp = Replace(Replace(vp, " ", ""), "P", "p")
    txp = Split(txp, "p")
    n = UBound(txp) + 1
    If txp(n - 1) = "" Then n = n - 1
    For i = 0 To UBound(txp)
        If txp(i) = "" Then txp(i) = 0
    Next i
    txp = "=(" & Join(txp, "+") & ")/" & n
    MOYP = Evaluate(txp)
End Function

qui s'utilisera comme toute autre fonction d'Excel (à placer dans un module standard).

Je n'ai par contre rien compris au traitement des autres valeurs littérales, au résultat à obtenir et au type de données du résultat (texte ou nombre). Il faudrait donc être plus explicite.

Cordialement.

Merci je regarde

Rechercher des sujets similaires à "formule besion aide possible"