XL 2016 [VBA] exercice fonctions

shanon7

XLDnaute Junior
Hello :)

Je galère sur l'exercice suivant :

Ecrire la fonction CompteLignes qui permet de compter le nombre de lignes de la plage de cellules MaPlage passée en argument et la tester dans EXCEL.
Vous pourrez utiliser la boucle For Each...Next. pour parcourir les lignes (propriété Rows de l’objet Range) de la plage de cellules MaPlage.
VB:
Function CompteLignes(MaPlage As Range) As Integer
    For Each Worksheets.Rows In MaPlage
    CompteLignes =
    Next
End Function

Je ne parviens pas à trouver comment compter les lignes. J'ai essayé de trouver des propriétés .Rows qui pouvaient me permettre de compter les lignes mais je n'aboutis à rien.
De plus, je ne sais pas s'il est nécessaire de spécifier une plage en disant par exemple maplage = range("A1:A5")? Ou est-ce que je peux juste laisser maplage et ensuite lancer directement la fonction depuis excel en sélectionnant une plage de cellules ?

Merci,

Shanon
 
Solution
Bonjour,

J'aurai un 10/10 ? :) Même pas besoin de boucle for ou autre :

CompteLigne = MaPlage.Rows.Count

Pas bien sorcier !

En vous servant de l'aide sur l'objet range vous auriez trouvé cette propriété.

Bonne soirée

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

J'aurai un 10/10 ? :) Même pas besoin de boucle for ou autre :

CompteLigne = MaPlage.Rows.Count

Pas bien sorcier !

En vous servant de l'aide sur l'objet range vous auriez trouvé cette propriété.

Bonne soirée
 

Statistiques des forums

Discussions
312 307
Messages
2 087 097
Membres
103 468
dernier inscrit
TRINITY