Compter cellules d'une colonnes via Macro Résolu/Fermé

Question

Bonjour,

Je voudrais créer une macro qui compte automatiquement le nombre de cellules qu'il y a dans une même colonne "C" mais sur plusieurs Feuilles de calcul.

Les feuilles contiennent un tableau avec plusieurs colonnes.

Aidez-moi s'il vous plaît car j'ai cherché dans plusieurs forums mais je n'ai rien trouvé.

Merci.

PS: Je suis nouvelle sur ce forum donc désolé si je ne suis pas assez clair.

Gyrus · Answer

Bonjour,

Le nombre de cellules dans une même colonne est toujours le même : 1048576 depuis Excel 2007.
Mais je ne pense pas que ce soit cela qui t'intéresse :)

Tu devrais joindre un fichier exemple avec quelques explications sur le résultat attendu (nombre de cellules renseignées ? toutes les feuilles du classeur ? etc.)

A+

Nakat · Answer

Bonjour,
Je voudrais créer une macro qui compte automatiquement le nombre de cellules qu'il y a dans une même colonne "C"
Je ne comprends pas bien, tu veux compter le nombre de cellules remplies dans chaque colonne "C" de ton classeur ? Le nombre de cellules qui sont les mêmes ?

thatha95 · Answer

Tout d'abord, merci à vous deux de m'avoir répondu.

Comme je l'ai dit je suis nouvelle, je sais pas du tout comment joindre un fichier. Je le ferais si vous me le dites.

Enfaite, ce que je veux faire, c'est calculer le nombre de cellules remplie dans la colonne "C" d'une feuille et indiqué cette valeur sur la feuille 1.
Par exemple:

Feuille 1: Résultats
Feuille 2: Colonne C --> Combien de cellules remplies ? --> Valeur dans B4 (Feuille 1)
Feuille 3: Colonne C --> Combien de cellules remplies ? --> Valeur dans B5(Feuille 1)
Feuille 4: Colonne C --> Combien de cellules remplies ? --> Valeur dans B6(Feuille 1)

Et ceci grâce à une macro, pour ne pas que je retape la formule à chaque fois que je crée une nouvelle feuille.

Merci.

Gyrus · Answer

Tu peux essayer ces formules :
=NBVAL(Feuil2!C:C)
=NBVAL(Feuil3!C:C)
=NBVAL(Feuil4!C:C)

Veux-tu toujours une macro ?
La voici :
Sub Test()Dim Ws As WorksheetDim K As LongDim i As Integer    With Worksheets("Feuil1")        i = 4        For Each Ws In Worksheets            If Ws.Name <> .Name Then                .Range("B" & i) = Application.CountA(Ws.Columns("C"))                i = i + 1            End If        Next Ws    End WithEnd Sub

A+

thatha95 · Answer

Bonjour,

Merci. Oui je veux une macro car je veux qu'elle se répète automatique à chaque fois que j'ajoute une nouvelle feuille de calcul.

Est-il possible de commencer par la cellule C8 et sélectionner toutes les cellules remplies.

Voilà le lien cjoint: http://www.cjoint.com/c/FGhmjB0dYd1 

Merci.

Gyrus · Answer

Bonjour,

Voici ton fichier avec la macro
https://www.cjoint.com/c/FGhpSYw8xtT

A+

Compter cellules d'une colonnes via Macro

6 réponses

Discussions similaires