Discussion :

[moulery]

Bonjour
voici ma colonne

je suis positionné sur ma colonne A

j'ai une liste dans ma colonne Z
Z
toto
tata
titi
tutu



EN vba comment savoir le nombre d'element dans ma colonne Z
ici 4 sans passer par une selection

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 Range("Z1").Select
Range(Selection, Selection.End(xlDown)).Select

Merci

[Krovax]

Bonjour
En gros tu veux la derniereligne de ta colonne
regarde la contribution
Dernière ligne et la dernière colonne renseignées d'une feuille
d'ouskel'n'or
Cela devrait t'aider

[aalex_38]

Bonjour à tous,

Tu veux la dernière ligne avec ou sans les cellules vides ?

Ici un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
sub quesaco()
'http://www.developpez.net/forums/d841988/logiciels/microsoft-office/excel/macros-vba-excel/savoir-nombre-element-colonne/
' Derniere ligne
Dim MaxLig As Long, NumLig As Long, Numcol As Integer
Numcol = 1
MaxLig = Feuil1.Rows.Count
NumLig = Cells(MaxLig, Numcol).End(xlUp).Row
MsgBox NumLig
 
' definition de la plage
Dim T As Integer, S As Integer, x As Long, y As Long, Maplage As Range
T = 1 ' Colonne 1
S = 1 ' Colonne2
x = 1 ' Ligne1
y = NumLig ' Ligne2
Set Maplage = Range(Cells(x, T), Cells(y, S))
 
MsgBox Maplage.Address
 
'nombre de cellules vides dans la plage
MsgBox Maplage.SpecialCells(xlCellTypeBlanks).Count
 
'et non vide
MsgBox Maplage.Count - Maplage.SpecialCells(xlCellTypeBlanks).Count
Set Maplage = Nothing
end sub

[laetitia]

bonjour moulery Krovax aalex le forum en utilisant une fonction peut être ??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Application.WorksheetFunction.CountA(Range("Z:Z"))

en complement cette fonction te donne le nombre d'elements elle ne donne pas la derniere cellule pleine tu peus avoir des blancs entre donc si tu recherche la derniere ligne pleine ou la premiere vide il faut suivre les recomandations des amis krovax & alex