suppression ligne dans listview

Anonyme
2013-02-08T09:02:28+00:00

bonjour a vous tous

suite au post que danielco a tres bien animé de tout son énergie, mais dont je ne peux pas copier le lien désolé

je voudrais pouvoir supprimer une ligne dans la listview sans déranger le calcul quise créer lorsqu'il n'y a pas de suppression

engros les textbox HT,TVA,TTC ne se rectifie pas lors de la suppression

http://cjoint.com/?CBij05lzni3 

j'y ai rajouter cette ligne de code derière le bouton "supprimer ligne'

'Supprime la ligne active

ListView1.ListItems.Remove (ListView1.SelectedItem.Index)

cordialement

Pascal

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire
Réponse acceptée par l’auteur de la question
Anonyme
2013-02-20T13:41:14+00:00

Toutes mes excuses. Après vérification, je t'ai envoyé le même fichier
que précédemment que j'avais conservé et non celui que j'ai modifié.

Voici cette fois le bon fichier : http://cjoint.com/?CBuoNKaJZo8  MichD

Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire

34 réponses supplémentaires

  1. Anonyme
    2013-02-11T14:20:22+00:00

    bonjour MichD

    merci pour ta réponse et du code du clic sur la listview, j'avais fait une amorce sur le fichier joint en expliquant que je suis bloqué car si je remets les textbox dans la listview une fois corriger et bien le calcul ne se fait pas dans les textbox du bas de l'usf

    Pascal

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  2. Anonyme
    2013-02-11T13:54:10+00:00

    Si j'ai bien saisi ce que tu tentes de faire...

    En fait, ton code original dans la procédure suivante
    s'exécute avant en cliquant sur le contrôle ListView avant
    qu'un item ait été sélectionné.

    J'ai adapté la procédure, d'abord vérifié si un item est
    sélectionne et si oui, lors du clic sur l'item, apparition du
    bouton modifier...

    Il te reste à code ce que tu faire exécuter au bouton "Modifier".

    Utilise ce bouton de code :
    '-------------------------------------------------
    Private Sub ListView1_Click()
    Dim X As ListItem
       With ListView1
           Set X = .SelectedItem
           If Not X Is Nothing Then
               Me.Ajout.Visible = False
               Me.modif.Visible = True
               TextBox2.Value = X.Text
               TextBox4.Value = X.ListSubItems(1).Text
               txtArticle.Value = X.ListSubItems(2).Text
               Txtunite.Value = X.ListSubItems(3).Text
               txtPU.Value = X.ListSubItems(5).Text
               Txt_qté_vente = X.ListSubItems(4).Text
           End If
       End With
    End Sub
    '-------------------------------------------------

    MichD

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  3. Anonyme
    2013-02-11T12:25:08+00:00

    bonjour MichD

    voici un nouveau lien

    http://cjoint.com/?CBlnxu2Qmhe

    Pascal

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  4. Anonyme
    2013-02-11T11:57:23+00:00

    Bonjour,

    En cliquant sur le lien, j'ai le message comme
    quoi le fichier n'est pas disponible.

    Je n'ai pas vu le fichier, mais il faut dire que je ne comprends pas ce que tu tentes d'expliquer et de réaliser!  MichD

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire