Vérification non vide chaque cellule d'une plage

Bonjour,

Je chercher à créer une condition qui mettrais un booléen a True si toute les cellules d'une plage sont non nul.

Du coup j'ai essayé de faire un combo If et Each mais bon c'est pas géniale , donc si qqn à une idée sur ce modèle ou un autre je suis preneur.

Sur ceux bonne fin d’après midi et merci d'avance.

Bonjour

Dans l'idée

Sub test()
  If Application.CountA(Range("A1:A20")) = Range("A1.A20").Count Then
    MsgBox "Ok : Toutes les cellules ne sont pas vides"
  End If
End Sub

Merci de ta réponse rapide c'est exactement ce que je voulais.