Bonjour, j'ai réalisé pas mal de recherche sur mon problème mais impossible de trouver la solution
Sub test()
Dim g As Integer
g = 2
For g = 2 To 200 Step 1
If Worksheets(1).Range("B" & g) = "Marge Moyenne Significative :" Then
Worksheets(1).Range(Range("B" & g), Range("B" & g + 12)).Delete
End If
Next
End Sub
Voici mon code, rien de plus simple, je parcours la colonne B à la recherche de "Marge Moyenne Significative :" et je supprime cette plage.
Mais l'erreur 1004 apparait tout le temps, j'ai essayé plein de chose différentes, avec Range(Cells(...)Cells(...)) mettre "II" au lieu de B et d'autres truc, rien n'y fait. :(
Si vous avez une solution.