Etendre une cellule à toutes les lignes suivantes
Bonjour à tous,
Merci d'avance pour l'aide que vous pourrez m'apporter.
Suite à l'extraction de données sur un site internet, je me retrouve avec un tableau excel de plusieurs milliers de lignes et un gros problème.
Les données sont regroupées par paquet en ligne, disons par exemple que toutes les data pour une date donnée sont sur des lignes qui se suivent. Malheureusement, la date n'apparait que sur la première ligne et ensuite toutes les lignes suivantes de cette colonne sont vides. Je souhaiterais un moyen rapide et efficace d'étendre une cellule sur une colonne, jusqu'à la prochaine cellule remplie par quelque chose de différent.
Ce n'est pas très clair, je sais
Vous trouverez en PJ un exemple de mon soucis.
Merci beaucoup,
mggluch
Bonjour,
à tester, sélectionner la plage au préalable,
Sub RemplirVide()
For Each c In Selection
If c.Value = 0 Then c.Value = c.Offset(-1, 0).Value
Next
End Sub