Bonjour,

Je souhaite tester si toutes les cellules d'une plage ("A7:J7") sont remplies.
J'ai écrit ceci (qui fonctionne) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
     If Target.Row = 7 _
    And IsEmpty(Range("A7").Value) = False _
    And IsEmpty(Range("B7").Value) = False _
    And IsEmpty(Range("C7").Value) = False _
    And IsEmpty(Range("D7").Value) = False _
    And IsEmpty(Range("E7").Value) = False _
    And IsEmpty(Range("F7").Value) = False _
    And IsEmpty(Range("G7").Value) = False _
    And IsEmpty(Range("H7").Value) = False _
    And IsEmpty(Range("I7").Value) = False _
    And IsEmpty(Range("J7").Value) = False _
    Then
 
        MsgBox ""
 
    End If
Mais voilà, je trouve pas ça très beau de tester les cellules les unes après les autres, et je voudrais savoir s'il n'y avait pas une méthode qui pourrait renvoyer un boolean si toutes les cellules de la plage ne sont pas vides. On peut négliger les cellules comportant une formules.

merci pour votre attention.

Sam