Paritec
XLDnaute Barbatruc
Bonjour à tous
déjà BONNE ANNEE 2010 a tous
j'ai un petit souci je n'arrive pas a faire ce que je souhaite
je voudrais en gros tester si toutes les cellules de la ligne sont vides?
j'ai fait comme ci-dessous mais c'était trop simple alors si vous avez une idée merci d'avance
a+
papou
déjà BONNE ANNEE 2010 a tous
j'ai un petit souci je n'arrive pas a faire ce que je souhaite
je voudrais en gros tester si toutes les cellules de la ligne sont vides?
j'ai fait comme ci-dessous mais c'était trop simple alors si vous avez une idée merci d'avance
a+
papou
Code:
fin = Feuil1.Range("A65000").End(xlUp).Row
dercol = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column
For i = 1 To fin
If Range(Cells(i, 26), Cells(i, dercol)) = "" Then MsgBox "oui elle est vide"
Next
Dernière édition: