Petit tableau avec condition

Fermé
Eric_3280 Messages postés 22 Date d'inscription jeudi 11 avril 2019 Statut Membre Dernière intervention 15 février 2022 - Modifié le 22 mai 2019 à 10:56
tuxboy Messages postés 994 Date d'inscription lundi 23 juillet 2012 Statut Membre Dernière intervention 28 mai 2019 - 22 mai 2019 à 13:50
https://www.cjoint.com/c/IEwiKbRdgHp

Bonjour.

Voici mon classeur ci-joint

Il y a une cellule D10. J'aimerais que cette cellule affiche "VIDE" s'il n'y a rien dans le tableau "H10:I19". Mais s'il y a une valeur quelconque, afficher " NON VIDE".

quelqu'un peut-il m'aider ? (Une formule avec fonction excel, et une autre avec code vba

Cordialement.

1 réponse

tuxboy Messages postés 994 Date d'inscription lundi 23 juillet 2012 Statut Membre Dernière intervention 28 mai 2019 189
Modifié le 22 mai 2019 à 13:51
Bonjour,

Pour la fonction :
Function Vide(r As Range) As String
Dim P As String
Dim a As Range
 P = "VIDE"
    For Each a In r
      If a.Cells.Value <> "" Then P = "NON VIDE"
    Next
Vide = P
End Function


Pour le code dans la cellule D10 :
=Vide(H10:I19)
0