Comment faire pour compter dans un tableau qui démarre de CA5 à CZ30
le texte qui se trouve par exemple L, QR
 
Sans être obligé de faire 30 fois copier coller
Range("CA42" ).Select  
[CA42] = [CountIf(CA5:CA30, "L" )] + [CountIf(CA5:CA30, "QR" )]
 
 
Range("CB42" ).Select  
[CB42] = [CountIf(CB5:CB30, "L" )] + [CountIf(CB5:CB30, "QR" )]  
 
Merci
 

Bonjour,
Le problème c'est que je ne comprend pas bien la question : Tu veux poser des formules ou tu cherches un résultat ?
 
Ben, t'a le choix :
ou tu étends ta formule (en 'tit nèg !) :
 
Range("CA42" ).Select  
[CA42] = [CountIf(CA5:CZ30, "L" )] + [CountIf(CA5:CZ30, "QR" )]  
 
Ou tu la gardes au ligne par ligne et tu fais une recopie incrémentée à partir de la première ligne. L'enregistreur te fera ça très bien.
 
Ou tu fais une boucle (toujours à la hache...)
For each o in Range("CA5:CZ30" )
if o.value = "L" or o.value = "QF" then maVar = mavar +1
Next
 
A+
 

Merci Galopin
 
Ce que je voudrais c'est d'obtenir
le résultats de chaque colonne.
1° colonne de CA5 à CA30  résultat dans la cellule CA42
2° colonne de CB5 à CB30  résultat dans la cellule CB42
3° colonne de CC5 à CC30  résultat dans la cellule CC42
4° colonne de CD5 à CD30  résultat dans la cellule CD42
5° colonne de CE5 à CE30  résultat dans la cellule CE42
ET AINSI DE SUITE
Je n'arrive pas en VBA car je ne veux pas avoir de formule sur la feuille  Excel.
A+

bonjour,
on peut faire comme ça :

A+