Filldata secondaire ()
Faible lrow en tant que longtemps
lrow = cellules (Cells.Rows.Count, « je »). Extrémité (xlUp). Rangée
Faible rng comme gamme, cellule comme gamme
Placer le rng = la gamme (« I1 : I » et lrow)
Pour chaque cellule dans le rng
cell.NumberFormat = « @ »
Si cellule. "" <> De valeur et Len (cellule. Valeur) < 12="" Then="" cell="">
|