Formule Excel

Bonjour

Merci a vous tous pour vos réponses cela correspond tout à fait à ma recherche si ce n' est pas abusé j aurais encore une demande

Comment calculer toujours dans une série de cellule comme par exemple celle ci

jrpmjrppamjmjrrrnjrrppmjrrppam

Le nombre de "jm" en sachant que maintenant il y peut y avoir ou non d autres cellules entre les "jm"

Et surtout que si le "j" rencontre un "a" ou un "n" avant le "m" alors il comptabilise un "ja" ou un "jn" au lieu de "jm"

Merci d'avance

Cordialement

Bonjour,

peux-tu mettre un exemple dans un fichier excel pour clarifier

car tu parles de série de cellules mais tu ne mets qu'une seule valeur exemple

Michel 59126

14exemple.xlsx (8.15 Ko)

Voilà le fichier exemple

Bonjour,

=SOMMEPROD(--((A1:AC1&B1:AD1)="JM"))

eric

Voici

mais je ne suis pas sûr d'avoir bien compris ce que tu cherchais !

9exemple.xlsx (9.04 Ko)
16exemple-2.xlsx (10.00 Ko)

Voilà j’espère avoir été plus clair sur ma demande

Merci encore

Donc ce n'était pas clair et pas que pour moi !

Belle formule pour Eric au passage (je ne l'avais pas vu en postant).

Je passe mon tour, d'autant que je ne vois pas l'intérêt.

in fine j'ai 1 voire 2 solutions que je posterai demain

Merci c est très gentil de ta part

Bonne soirée

En attendant la proposition de Steelson, une fonction personnalisée :

Function nbJx(plage As Range, motif As String)
Msgbox " ah ben non, y' un bug. Demain peut-être alors :-)"
End Function

eric

Bonjour Eric,

@Vincent, tu nous diras à quoi cela sert ...

par formule

11exemple.xlsx (9.11 Ko)

Bonsoir,

une petite macro qui demande:

la cellule ou se trouvent les données

les données à chercher

elle donne en réponse la fréquence dans un MsgBox ou l'annonce à haute voix

Sub Freq_nb_car()
'
' Macro Numero  M1515 creee par Soleusterm
' Macro fonctionnelle sous Microsoft Office 2016 creee pour votre usage
' Cette Macro permet de rechercher un groupe de caracteres dans une cellule et d'en donner la quantite'
'
Dim Valeur As Single
Dim Nombre As Integer
Dim maCell As String
    maCell = Application.InputBox(Prompt:="Cellule de depart", Title:="Origine", Default:="A1", Type:=2)
Dim maLoc As String
    maLoc = Application.InputBox(Prompt:="Caracteres recherches", Title:="caracteres", Default:="toto", Type:=2)
Range(maCell).Select
'ActiveCell.Select
    Selection.Copy

    Sheets.Add.Name = ("TESTjm")
    Range("A1").Select

    ActiveSheet.Paste
   ActiveCell.Replace maLoc, "1"
   Set rng = Cells(1, 1)
For i = 1 To rng.Characters.Count
If IsNumeric(rng.Characters(i, 1).Text) Then Cells(1, 2) = Cells(1, 2) & rng.Characters(i, 1).Text '.Count
Next
    Range("C1").Select
        ActiveCell.FormulaR1C1 = "=LEN(RC[-1])"

    Nombre = ActiveCell.Value

    SendKeys ("{ENTER}")
    Sheets("TESTjm").Delete
    MsgBox (maLoc & " est present " & Nombre & " Fois")
    'ou
    Application.Speech.Speak maLoc & " est present " & Nombre & " Fois"

End Sub

Cordialement

merci beaucoup je vais tester ça demain

C'est un programme pour compter les indemnités horaires en fonctions des postes effectués

Si la personne est de Jour (J dans tableau) et qu 'ensuite elle est du Matin (M dans tableau) elle a droit aune indemnités de 2h, de 3h pour un JA(jour-après:midi) et de 4h si c'est JN (jour-nuit)

voilà à quoi va servir ce programme

Encore merci et je revient vers vous sij'ai encore besoin

bonne soirée

Rechercher des sujets similaires à "formule"