Bonojur,
j'ai un petit souci de comptage de case non vide
mon tableau de taille 6 lignes, contient les valeurs suivantes : 2777, 2777, 2777, 2778, 2700, vide.
Voici mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Dim numlap As Variant
'fonction qui remplit le tableau
 'comptage du nombre de ligne non vide du tab 
 j = 1
    While IsEmpty(numlap(j)) <> True 'tant que ligne tableau non vide
                        j = j + 1
    Wend
Seulement j'obtient J=6 alorsque ce devrait être 5.
Où est l'erreur? Je pensais que mon code éait bon, mais non.
Merci de m'aider.