Range.offset.Value<> problem

Bonjour,

J'ai recupéré un fichier excel avec des macros. Cependant, je bloque sur une partie du code (ci-dessous). Mon Worksheet prévoit une liste de noms dans un tableau composé d'une colonne. Sur la première ligne de ce tableau est écrit HR LIST. Un peu plus bas dans mon fichier, j'ai un second tableau d'une colonne avec écrit sur la première ligne NOT HR.
Je comprends aue la fonction Range.Offset.Value permet de parcourir le fichier et de récupérer les données dans les cellules.
Cependant, je ne saisi pas à quoi correspondent les parties <> "HR LIST" et <>"NOT HR".
DOis-je comorendre que la boucle s'arrête lorsque j'atteint respectivement les lignes HR LIST et NOT HR ?



Dim nbhr, nbnothr, nb As Integer
nbhr = 0
While Range("A1").Offset(nbhr, 0).Value <> "HR LIST"
nbhr = nbhr + 1
Wend

nbnothr = 0
While Range("A1").Offset(nbnothr, 0).Value <> "NOT HR"
nbnothr = nbnothr + 1
Wend

nb = nbnothr - nbhr - 1



Je vous remercie pour l'aide que vous pouvez éventuellement m'apporter.