Transfert données plages variable

Bonjour,

J'ai deux plages sources avec lesquelles j'aimerai remplir une troisième plage.

Ces deux plages ne sont pas en haut de la feuille du coup je n'arrive pas à ajuster le comptage de cellules pleines. En effet j'ai besoin de cela car les deux plages sources sont remplis de manière variable.

(L'ordre de remplissage de la plage d'arriver n'est pas important)

Voici un fichier excel pour shematiser mon problème.

D'avance merci à vous!

Jean-Philippe

Bonsoir jpto

Pour t'aider :

Sub test()
    Dim rng As Range, total As Long
    For Each rng In Sheets("Feuil1").Columns(2).SpecialCells(xlCellTypeConstants).Areas
        total = rng.Cells.Count
        MsgBox total
    Next
End Sub

klin89