Re : insertion automatique de ligne et remplissage selon recherche H sur autre feuill
Bonjour draale, le forum,
Flemmard, pas grave, moi aussi
Cette toute petite macro ne sera utilisee qu'une fois :
Code:
Sub MettreDes2()
Dim cel As Range
For Each cel In Range("N2", Cells(Rows.Count, "N").End(xlUp))
If cel.Offset(1) = "1" Then cel.Replace "0", "'2"
Next
End Sub
Ecrite sans pouvoir tester car je suis sur OpenOffice !