Sélection conditionelle de lignes

Bonjour a tous,

J'écris ici pour demander de l'aide (comme vous pouver vous en douter 🙂)

Présentation du problème :

J'ai réalisé une macro pour sélectionner puis copier et coller des lignes d'une feuille excel dans une autre.
Seulement dans ces lignes, j'en ai des inutiles (si il y en avait pas cela serait un peu trop facile) que je ne veux pas sélectionner. Et le problème vient du fait que je ne sais pas combien il y en as ni ou elles seront placées (sinon il n'y aurait pas de problème).
Il y a un exemple en pièce jointe.

Voici le bout de macro pour la sélection que j'ai réalisé (bien sur cela ne marche pas) :

Plage = ""
For j = 2 To 101
i = j
While Cells(i, 2).Value <> "" And Cells(i, 2).Value <> "#N/A"
Plage = Plage & i & ":" & i & ","
i = i + 1
Wend

Next j

If Right(Plage, 1) = "," Then Plage = Left(Plage, Len(Plage) - 1)
Range("" & Plage & "").Select


Je suis preneur de tout ce que vous aurez à proposer
Merci beaucoup