Bonjour,
la BD fait 200 000 lignes.
le principe est celui ci :
si B = 0 alors B prend la valeur de C.
avant
....................colonneA....................colonneB....................colonneC
ligne 1.............aaa...............................17..............................85
ligne 2.............bbb...............................0................................42
ligne 3.............ccc...............................106............................90
ligne 4.............ddd...............................0................................20
après
....................colonneA....................colonneB....................colonneC
ligne 1.............aaa...............................17..............................85
ligne 2.............bbb...............................42................................42
ligne 3.............ccc...............................106............................90
ligne 4.............ddd...............................20................................20
Voici mon code.
Dim ws As Worksheet
Dim lastRow As Long, lRow As Long
Dim rw
Set ws = Worksheets("BD")
lastRow1 = ws.Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lastRow
If Range("B" & i) = 0 Then
Range("B" & i) = Range("C" & i)
End If
Next i
Merci.