Tester une plage

Bonjour a toutes et tous, Forum Bonjour

Je souhaiterai svp tester en VBA une petite plage de données, voir svp la photo ci-jointe

où j'explique ma demande, plus simple qu'un long discourt

Merci pour votre aide et pour votre temps, une bonne journée

Cordialement Ray

Bonjour

A tester

  If Application.CountA(Range("E21:P23")) = 0 Then
    ' plage vide
  End If

Salut Banzai64

Merci bien pour ta réponse

j'ai essayer ton code et je trouve pas comment faire pour enlever le zéro de la cellule 023 dans la colonne mois de novembre

Cas de la photo jointe ce matin

je n'ai pas bien compris le fonctionnement du code.

If Application.CountA(Range("E21:P23")) = 0 Then
    ' plage vide
  End If
 

Merci a toi et bonne après midi

Cdlt Ray

Bonjour

Si y a un 0 dans cette cellule c'est qu'une macro l'a placé dans cette case

Avant de l'écrire tester si l'on va écrire un 0 et dans ce cas ne pas l'écrire

CountA est l'équivalent de NBVAL() (voir l'aide)

Si tu ne veux pas enlever les 0 essayes

If Application.CountA(Range("E21:P23")) - Application.CountIf(Range("E21:P23"), 0) = 0 Then
    ' plage vide
 End If

CountIf est l'équivalent de NB.SI() (voir l'aide)

Salut Banzai64

Merci pour la modification, j'ai adapter et fait des essais ça m'a l'air d'etre bon.

je verrai a l'utilisation dans le temps

Encore tout pleins de merci pour toi

Bonne fin d'après midi

Cordialement Raymond