Résolu Résolu Bouton supprimer sur Listbox

Monhtc

XLDnaute Junior
Bonjour chers tous,
Débutant en VBA je galère sur un code sans trouver de solution. C'est pourquoi j'aimerais soumettre mon problème afin de pouvoir bénéficier de votre assistance.

Sur un formulaire j'ai crée un bouton "delete" afin de pouvoir supprimer une ligne de données via ma Listbox "bdd" si celle-ci est sélectionnée. j'ai utilisé le code qui suit tout en bas. Cependant quand je l’exécute en cliquant sur le bouton, il supprime la ligne supérieur à ma sélection
VB:
Private Sub delete_Click()
Dim i As Integer

For i = 0 To Range("A65356").End(xlUp).Row - 1
    If bdd.Selected(i) Then
        Rows(i).Select
        Selection.Delete
    End If
Next i
End Sub
 
Ce fil a été résolu! Aller à la solution…

Roblochon

XLDnaute Accro
Bonsoir,

Les numéros de lignes de feuille commençant à 1 et vos items de bdd à 0 vous pouvez essayer :Rows(i+1).EntireRow.Delete
sans passer par la sélection, à moins que vous en ayez besoin.

Cordialement
 
Ce message a été identifié comme étant une solution!

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas