Vérifier le format date des cellules d'une colonne

Bonjour à tous,

Help je suis bloquée dans mes tests.

Je dois vérifier que les colonnes H, J et L de mon fichier inventaire sont en format date


Je bugge après:
Sub Comparaison des noms
Range("G2").Select
For i = 1 To NbreLignes

End sub

Merci d'avance de vos réponses