Supprimer ligne contenant "" depuis une autre feuil

Bonjour, je cherche a supprimer une ligne contenant un texte spécifique, j'y arrive bien mais j'aimerai la lancer depuis une autre feuille.

Si quelqu'un a une idée je suis preneur

Merci

Bonsoir,

Teste avec le bouton qui en feuille 2 avec le remplacement du code par celui-ci

Sub SupLign()
Dim i As Long
Worksheets("feuil1").Activate
For i = Worksheets("feuil1").Range("A65536").End(xlUp).Row To 1 Step -1
    If UCase(Cells(i, 1).Value) Like UCase("*ordinateur*") Then Rows(i).Delete
Next i
Worksheets("feuil2").Activate

End Sub

Merci, ça fonction, peut 'on mettre la colonne A au lieu de choisir jusqu'au Range A65536 pour que se soit compatible avec n'importe quelle version de Excel?

Merci