Bonjour,
J'ai mon fichier Macros qui me permet d'exécuter une macro pour supprimer dans mon fichier Banque de la colonne B les codes BANQUES BNP458 et POUY985.
Le code ne s'exécute pas correctement. Pourriez-vous me venir en aide ?
Voici mon code :
Sub Suppr()
Dim i As Integer
With ThisWorkbook.Sheets("BASE")
For i = .Range("B" & .Rows.Count).End(xlUp).Row To 2 Step -1
If .Range("B" & i).Value = "BNP458" Then .Rows(i).Delete
If .Range("B" & i).Value = "POUY985" Then .Rows(i).Delete
End If
Next i
End With
End Sub
En vous remerciant beaucoup de votre aide.
Partager