Supprimer les 3 dernières lignes d'un tableau Excel

Bonjour,

Je sollicite votre aide car je tourne en rond depuis quelques temps.

Voici mon problème :

J’exporte depuis une base de données plusieurs fichiers.

Ceux-ci ont, en fin de fichier, 3 lignes que je souhaite supprimer.

Il s’agit de : Moyenne, Total et Moyenne par Jour.

Elles sont placées pour chaque fichier aux 3 dernières lignes, mais le nombre de

Données pour chaque fichier est différent, donc, elles ne sont pas au même numéro de ligne.

J’ai donc, au début, fait une macro qui supprime les lignes contenant « Total »,« Moyenne » et "Moyenne par jour".

Malheureusement, si par hasard, dans les données que j’analyse, il y a un de ces cinq mots, hop, plus de ligne.

Comme on dit, c’est ballot !!!!

Je cherche donc un petit code qui me permettrait de supprimer ces 3 dernières lignes.

J’ai tenté plusieurs choses, j’ai fouillé sur la Toile, et là, j’avoue que je suis perdu ….

Ci-joint un fichier exemple. Afin de respecter la confidentialité, j’ai modifié les données.

Merci d'avance pour votre aide.

Cordialement

Bonjour,

Essaie avec

Sub SuppLign()
    Range("A" & Rows.Count).End(xlUp).Offset(-2).Resize(3).EntireRow.Delete
End Sub

A+

Bonjour Frangy,

Merci beaucoup, cela marche nickel.

Cela semble si simple, et pourtant......

Merci pour cette piste que j'ai mis à ma sauce.

Je n'étais pas loin, mais je n'y étais pas.....

Bon Dimanche.

Cdt