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
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.
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.
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.