Discussion :

[luko6]

bonjour à tous voici mon code que je veux ameliorer :

Code :

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

1
2
3
 For Each Cellule In Range("c5:c6000")
        If Cellule = "" Then Cellule(1, 1) = "Production facturable"
    Next Cellule

je veux que le range soit ("c5:cX") ou X est egale au nombre de ligne dans mon tableau
je connais le code

Code :

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

MsgBox Range("a4").CurrentRegion.Rows.Count

est ce possible de l'utiliser dans mon premier code?
merci

[mercatog]

une autre proposition

Code :

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

1
2
3
For Each Cellule In Range("c5:c" & cells(columns(1).cells.count,1).end(xlup).row)
        If Cellule = "" Then Cellule(1, 1) = "Production facturable"
    Next Cellule