Microsoft 365 sélectionner uniquement les lignes NON vides

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,

J'ai récupéré un code sur le Forum, MERCI à l'auteur :
VB:
Sub selection()
Dim Cel As Range, Plage As Range

For Each Cel In ActiveSheet.Range("C1:m35")
  If Cel > 0 Then
    If Plage Is Nothing Then
      Set Plage = Cel.EntireRow
      Else
      Set Plage = Application.Union(Plage, Cel.EntireRow)
    End If
  End If
Next
Plage.Select
End Sub
Ce code fonctionne très bien et sélectionne les lignes NON vides.
Mon besoin est de sélectionner (à l'inverse) UNIQUEMENT les lignes VIDES.
Je n'arrive pas à modifier le code Grrrr !!!:mad:
Pourriez-vous m'aider ?
Je joins le petit fichier test et je continue mes recherches ...
lionel :)
 

Pièces jointes

  • lgn_Vides.xlsm
    21.9 KB · Affichages: 5
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 948
Membres
101 849
dernier inscrit
florentMIG