[VBA] Aide pour suppresion de lignes en fonction d'une valeur issue d'un co

Bonjour, j'ai un petit désagrément avec un bout de code qui doit me permettre de supprimer les lignes d'un tableau nommé en fonction de la valeur d'un combobox.

J'ai un combobox alimenté par des données issues d'un tableau (actuellement des valeurs allant de 000 à 200), je souhaite que lorsque la valeur saisie est trouvée dans mon tableau supprimer toutes les lignes où la valeur est trouvée dans la listcolums "vpn-instance"

dim vrf as long
vrf = Application.Match(Me.delete_vrf, .ListColumns("vpn-instance").DataBodyRange, 0)
If .ListColumns("vpn-instance").DataBodyRange(vrf) = Me.delete_vrf Then
.ListColumns("vpn-instance").DataBodyRange(vrf).EntireRow.delete

ce code associé à une boucle for fonctionne mais j'ai une incompatibilité de type lorsque la valeur n'est plus trouvée.

mon combobox se nomme delete_vrf

si une âme charitable veut bien m'expliquer où je me plante...

Bonjour,
Joins un fichier pour une aide adaptée du forum.
Cdlt.

Rechercher des sujets similaires à "vba aide suppresion lignes fonction valeur issue"