Discussion :

[léclaireur]

Bonjour,

Comment afficher n variables via une msgbox sous VBA.
Les variables en question sont les numéros de ligne des cellules vides dans une colonne quelconque.
n étant limité, car il y a une autre condition qui évite d'avoir un grand nombre de variables.
Cette condition étant: afficher ces numéros de ligne de cellules vides de la colonne F, par exemple, à condition que sur la même ligne, la cellule de la colonne X soit remplie.

Voilà voilà, j'espère avoir été clair.

[SfJ5Rpw8]

et ou en est tu...?

[léclaireur]

je ne sais pas faire

[dadavyvy]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
nmax = 50: ncount = 0
listn = ""
set feuil = Feuil1
for i = 1 to feuil.range("x65536").end(xlup).row
    if feuil.cells(i, 6) = "" and feuil.cells(i, 24) <> "" then
        if listn = "" then listn = i else listn = listn & ";" & i
        ncount = ncount + 1
        if ncount = nmax then exit for
    end if
next i
msgbox nmax & " 1ères lignes ou F vide et X non vide :" & vbcrlf & ncount & " lignes :" & vbcrlf & listn