Passage donnée string en variable

Bonjour les contributeurs ,

XL ne veut pas passer une donnée string de ma page en variable... Sur la macro rappro2.

 For i = 2 To drnNvLst
                    If ws6.Range("AH" & i) <> "" Then
                         clas = Range("AD" & i)
                    End If

La macro et le fichier vous en diront plus.

cdt

Re,

en fait il manquait la page c'est à dire ws6. devant le Range.

Mais le probléme reste, dsl En fait il ne veut rien trouvé avec çà :

if ws6.Range("AH" & i) <> 0 Then

Bonjour,

Peut-être normal nom, il faudrait que la colonne contienne quelque chose