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

Bernard_XLD

XLDnaute Barbatruc
Membre du Staff
Dernière édition:

Discussions similaires

Réponses
2
Affichages
154
Réponses
6
Affichages
142

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 294
Messages
2 086 895
Membres
103 404
dernier inscrit
sultan87