bonsoir BertGrav,
Avec ce code :
Range('A65536').End(xlUp).Offset(1, 0).Select
On Error Resume Next
Selection.SpecialCells(xlCellTypeBlanks).Select
ActiveCell.Select
parviens-tu à ton résultat ?
Bien cordialement
Rénato
(Désolé BertGrav, je viens de prendre connaissance du topic des brillants JMPS & Hellboy qui répondent également à la même question...en fait tu as 'doublonné')
Message édité par: Rénato, à: 20/09/2005 23:13