Bonjour,
J'aimerais tester si une plage de cellules est vides. Aucunes valeurs dans toutes les cellules
J'ai invariablement toujours le même résultats "plein" que je renseigne les cellules ou non

J'ai trouvé ceci sur ce forum :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Set wksClFinale = Worksheets("Cl Finale")
wksClFinale.Select
Dim myRange As Range
Set myRange = Range("R5:R10")
 If IsEmpty(Range("R5:R10")) Then
  MsgBox ("vide")
  Else
  MsgBox ("plein")
  End If
Ou

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
SSet wksClFinale = Worksheets("Cl Finale")
wksClFinale.Select
Dim myRange As Range
Set myRange = Range("R5:R10")
 If IsEmpty(myRange) Then
  MsgBox ("vide")
  Else
  MsgBox ("plein")
  End If
Merci de vos retours
FikoU