Bonjour tout le monde !!

J'ai un petit problème.
Dans une 1ère ligne de code je masque certaines colonnes, seulement lorsqu'ensuite je veux mettre en place une boucle While :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
While ActiveCell.Value <> ""
If ActiveCell.Value = "APPEL1" Then
    For i = 1 To 20
    If Range("A6").Value = "T.ACTEUR" & i Then
        Range("B6").Offset(0, k).Copy
        Workbooks(fic_journalier & " " & mois & " " & annee & " " & "S" & semaine & ".xls").Activate
        Range("C5").Offset(j, 0).PasteSpecial
        j = j + 1
        Workbooks("REQUETE MARS.xls").Activate
        Range("B5").Offset(0, k).Select
        k = k + 1
        Range("B5").Offset(0, k).Select
    Else
        j = j + 1
        Workbooks("REQUETE MARS.xls").Activate
        Range("B5").Offset(0, k).Select
        k = k + 1
        Range("B5").Offset(0, k).Select
    End If
    Next i
Else
    k = k + 1
    Range("B5").Offset(0, k).Select
End If
Wend
il prend en compte les cellule que j'ai masqué, or je les ai masquées pour ne pas qu'elles soient prises en compte justement (car ce sont justement les cellules vides que je veux éviter que j'ai masqué)

Avez-vous une solution ?

Merci.