Bonsoir,
Avez-vous une idée de l'erreur que contient ce code ?
merci d'avance
'Remplacer les cellules qui portent la lettre "M" par la lettre "H"
Sub texte_uniformesexe2()
Dim worksheet As worksheet
Dim workbook As workbook
For i = Range("A7") To Range("T184")
If worksheet("VDN_1bis").Range.["i"].Value = "M" Then
Range("i") = "H"
End If
Next
End Sub