Informations RangeEmpty

Magic_Doctor

XLDnaute Barbatruc
VB:
Function RangeEmpty(vRange As Range) As Boolean
'Vérifie si une plage de cellules est entièrement vide ou pas
'Si la plage n'est pas entièrement vide --> FALSE (ou l'équivalent dans la langue locale)
'Si la plage est entièrement vide --> TRUE (ou l'équivalent dans la langue locale)

  RangeEmpty = (vRange.Count - Application.CountBlank(vRange) = 0)
 
End Function
 

Discussions similaires

Statistiques des forums

Discussions
311 740
Messages
2 082 047
Membres
101 880
dernier inscrit
Anton_2024