Compter

  • Initiateur de la discussion Michael
  • Date de début
M

Michael

Guest
Bonsoir à tous,

Qui peut me dire comment trouver le nombre de cellules non vides contenues dans chaque colonne non vide d'une feuille.

Merci

Michael
 
S

STéphane

Guest
bonjour

pourquoi pas ça

Sub dhd()
For Each cl In ActiveSheet.UsedRange.Columns
If Application.CountA(cl) > 0 Then colnonvides = colnonvides & cl.Column & Chr(10)
Next cl
If colnonvides <> "" Then MsgBox colnonvides
End Sub
 
M

Michael

Guest
Merci Stéphane, mais ça ne semble pas convenir à mon besoin.

Je m'explique mieux :

J'ai besoin de savoir laquelle des colonnes de ma feuille contient le moins de données. C'est pour cela que je souhaite savoir combien de cellules non-vides elles contiennent (chacune).

Michael
 
S

STéphane

Guest
oui eh bien dans mon code ceci be warned when a program has been transported application.counta(cl) retourne le nombre contenues dan ta colonne si je ne m'abuse, après tu peux en faire ce que tu veux
 

Discussions similaires

Réponses
9
Affichages
643

Statistiques des forums

Discussions
303 475
Messages
2 011 477
Membres
219 000
dernier inscrit
flaplace