Compter des cellules avec commençant par 3 nombres et lettre

Résolu
Juju -  
 Juju -
Bonjour,
J'ai un Tableau Excel dans lequel j'entre des données dans le format: "123PTNLS", "123NTNLS" ou "KPPPTERS"
J'aimerais compter le nombre de cellule dont les 3 premières données sont des chiffres et la 4ème un "P".
Pouvez-vous m'aider s'il vous plaît?

Merci par avance pour votre Aide!

A voir également:

3 réponses

Vaucluse Messages postés 26496 Date d'inscription   Statut Contributeur Dernière intervention   6 438
 
Bonjour
peut être avec celle ci

Bonjour
peut être avec:

=SOMMEPROD((ESTNUM(GAUCHE(A1:A100;3)*1)*(STXT(A1:A100;5;1)="P")*(A1:A100<>""))

N° de mignes obligatoire avec ce code dans le slimtes de champs.

crdlmnt
1
Juju
 
Merci beaucoup, ça marche parfaitement.
Meilleures salutations
0
eljojo_e Messages postés 1155 Date d'inscription   Statut Membre Dernière intervention   154
 
Bonjour,

essaye ca :

=SOMMEPROD((CNUM(GAUCHE(SelectionneTesCellules;3))<1000)*(DROITE(GAUCHE(SelectionneTesCellules;4);1)="P")*(GAUCHE(SelectionneTesCellules;3)))


Le "SelectionneTesCellules" est la plage où sont stockés tes données du type "133P"
ex :
SOMMEPROD((CNUM(GAUCHE(A1:A3;3))<1000)*(DROITE(GAUCHE(A1:A3;4);1)="P")*(GAUCHE(A1:A3;3)))


Chez moi ça fonctionne :)

Cordialement,

Mesurer la masse de sa connerie permettrait dans connaitre sa gravité ;)
0
Juju
 
Bonjour,

Merci pour votre réponse.
J'ai en fait mal formulé mon problème.
Voici un exemple de liste:


KoG





KDRIVE

010ZPRSI

KDRIVE

KDRIVE

KDRIVE

002ZPMLS

003ZPCMAY

002ZPMLS

KDRIVE

002ZPMLS

oV

oV

oV

007ZPRGE

014JAMSL

KPTEP



KoG

014JAMSL

KoG

kA

KoG

KoN

021Z4PLS

F

KoG

Krank

KoG



KoN



J'aimerais donc compter le nombre de cellules Avec "P" en 5ème Position et dont les 3 premières positions sont des chiffres. De plus, il s'agit d'un fichier Excel où je ne peux pas utiliser les macros... Il y a aussi des cellules vides...
Ca fait beaucoup de paramètres...

En tout cas, merci déjà pour votre aide et le temps passé sur mon problème...

Cordialement

Juju
0
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
Bonsoir

Avec un fontion personnalisée, à mettre dans un module de l'éditeur VBA (ALT F11 pour ouvrir l'éditeur, Insertion Module puis copier-coller le code et fermer l'éditeur
Function denomb(plageD As Range, plageF As Range, lettre As String)
d = plageD.Row
f = plageF.Row
c = plageD.Column
For x = d To f
code = Cells(x, c).Value
If IsNumeric(Left(code, 3)) And Mid(code, 4, 1) = lettre Then Total = Total + 1
Next
denomb = Total
End Function


La fonction s'utilise après comme toute fonction excel selon la syntaxe :

=denomb(adresse 1ere cellulle;adresse dernière cellule;la lettre cherchée)

ex denomb(A1;A100;"P")

Cdlmnt
0