VBA Range.Rows.Count donnant des résultats inattendus

Question

J'ai une variable Range qui contient une adresse - $ 2: $ 2, $ 4: $ 205, $ 214: $ 214 - (3 groupes de lignes).

Je voudrais connaître le nombre de lignes dans cette plage.

Cependant, range.Count me donne le compte de toutes les cellules (50,000 ~) et range.Rows.Count ne renvoie que 1 - le nombre de toutes les lignes du premier groupe. Comment puis-je obtenir le nombre de toutes les lignes

Merci

Answer 1

Dim rowCount As Long 
Dim ctr As Long 

'You could use your range variable in place of Selection below 
For ctr = 1 To Selection.Areas.Count 
    rowCount = rowCount + Selection.Areas(ctr).Rows.Count 
Next 
Debug.Print rowCount