Discussion :

[cyrillm29]

Bonjour,
Je réalise pour mon travail un formulaire de saisie de données
Il se trouve que je bloque a un point, la suppression de données.
Le formulaire est sur deux pages
La page 1 permettant de rentrer les informations principales qui vont remplir les listbox de la page 2
La page 2 est composée de listbox remplies via la page 1, lorsque l'on sélectionne les données des listbox on peut ensuite renseigner des données qui vont concernées la sélection
J'aimerai pouvoir inclure un bouton supprimer, ce bouton permettant de supprimer la ligne sélectionner via les listbox sans un inclure de ligne vide dans le fichier
Ci joint le formulaire, pour l'activer il faut cliquer sur saisir des données
dans l' attente d'une réponse
Bonne journée et merci d'avance

[Mr l'Ashanti]

la chose la plus simple est que tu dois créer une ligne sur la feuille qui sert d'enregistrement avec la formule d'excel[=ligne()] et utiliser pour la suppression.
exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub Bt_sup_Click()
 Dim i As Integer
    With Sheets("non_de_feuille")
    i = no_ligne
        If MsgBox("Voulez-vous supprimer " & La_ligne & " de la liste définitivement? ", _
    vbExclamation + vbYesNo, "Delete action...") <> vbYes Then Exit Sub
        .Range("a" & i).EntireRow.Delete 
    End With
End sub

ce même code peut te servir pour la modification des enregistrements . très pratique
je crois t'avoir répondu juste

j'ai créé une deuxième listbox et un bouton pour supprimer les données. tu n'as qu'à sélectionner tes données dans la listbox et pzff l'opération est faite.