[VBA Excel] nb cells non vide dans une colonn

Raph -  
 ensatien -
Bonjour,

Comment connaitre le nombre de cellule non vide contenu dans la colonne A par exemple de la sheet1 ?
via fonction c'est simple il y a le NB.Si, mais en VBA ?

quelqu'un a t-il une idée ?

Merci

Raph
A voir également:

2 réponses

Réponse 1 / 2
xjl Messages postés 232 Statut Membre 183
 
Salut,

Tu peux faire ça:

Sub comptage()
n = 0
For Each Cell In Sheets(1).Columns(1).Cells
If IsEmpty(Cell) Then n = n + 1
Next Cell
MsgBox n

End Sub
13
Raph
 
Merci Xjl, j'ai trouvé plus court ;)

nbcells = Application.WorksheetFunction.CountA(Feuil1.Range("$A:$A"))
0
hammougua
 
Ab44 25 juil. 2009 à 13:15
et pour une collone B tu ferais comment ?
et tu le déclare comment nbcells ?
0
Gotts
 
Dim nbcells As Integer

et pour B suffit de remplacer les A par B ...
0

Discussions similaires

VBA/Excel Instruction: On Error Resume Next
loic -
Monarch -

23 réponses
[Excel VBA] Créer des dossiers sous VBA
Kvo -
Dred -

12 réponses
[Excel Vba] Insérer une ligne
xjl -
RP -

4 réponses
[excel] feuille active
28_seb -
pascooul -

5 réponses
Vba : insérer du texte dans une cellule vide
l0ul0ute -
teteve -

13 réponses
se positionner dans une cellule en vba
lodam -
tomtom -

5 réponses