Re : Recherche premiere cellule non vide
Bonjour,
Je ne suis pas une pro du VBA, mais je verrai un truc comme ça :
[A:A] = [A:A].Value
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
DisplayAlerts = False
ActiveSheet.UsedRange.Select
Application.Range("A1", Range("A65352").End(xlUp).SpecialCells(xlCellTypeVisible)).Select
Debug.Print Application.Range("A1", Range("A1").End(xlDown)).SpecialCells(xlCellTypeVisible).Address
Bon courage.