Bonjour,
j'ai effectué une macro mais je souhaiterais l'optimiser et la réduire mais je ne trouve pas comment, pouvez vous m'aider svp ?
Sub ROUGE()
Dim i, j, k As Integer
Dim x As Variant
i = 127
Do
i = i + 1
Loop Until Feuil1.Range("B" & i).Text = "GÉNÉRATEURS"
k = 4
Feuil1.Range("AB" &...