Erreur suppression de ligne d'un tableau

J'ai un bouton à coté d'un tableau qui me permet de supprimer une ligne.

Sub Suppression_Ligne5()

Selection.ListObject.ListRows(5).Delete

End Sub

Le tableau peut faire de 1 à 10 lignes.

Evidemment lorsque l'on clique sur le bouton mais que le tableau ne va pas jusqu'à la ligne 5 un message d'erreur apparaît.

Que pourrais-je ajouter à mon code pour éviter le message d'erreur?

Je vous remercie par avance.

Bonjour Olivier TP,

Tu pourrais contrôler la derniere ligne et en fonction de cette valeur supprimer ou non la ligne.

Sinon méthode plus radicale:

Sub Suppression_Ligne5()

On error resume Next
Selection.ListObject.ListRows(5).Delete
On error goto 0

End Sub

Bonne idée !
Je vais essayer ça.

Et en attendant ta méthode "radicale" est TOP

Bonjour,

Selection.ListObject.ListRows.count

devrait te renvoyer le nombre de lignes de ton tableau. Tu peux mettre ça dans un if ...

Je n'avais pas pensé à ça.
je vais faire quelques essai avec :)