suppression de plusieurs lignes fichier excel

Question

Bonjour,

Je voudrai en fait dans ma macro excel rechercher dans ma colonne M  la cellule contenant l'expression: "  'Param prod Ok : En alarme (894)  "  

Et une fois trouver, repérer à quelle ligne elle se trouve ( on va l'appeller "m") et supprimer toutes les lignes allant de la premiere à la ligne n ( n= m-1)

Comment pourrais-je faire simplement ?
Merci d'avance!

pijaku · Answer

Bonjour,
Par macro, le code donne quelque chose comme cela (attention, à tester d'abord sur un fichier "test"!! car je n'ai pas testé moi même et comme on parle de suppression...)
Sub supprimejusqua()
Dim valeur As String
Dim m As Integer
valeur = " 'Param prod Ok : En alarme (894) "
m = Cells.find(valeur,,xlvalues).Row
Range(Cells(1, 1), Cells(m, 1)).EntireRow.Delete
End Sub

Suppression de plusieurs lignes fichier excel

1 réponse

Discussions similaires

Newsletters