Supprimer des lignes de tableaux ( liés) en un clic

Résolu
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 - 31 mai 2023 à 14:32
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 - 3 juin 2023 à 12:51

Code VBA Excel.


Bonjour. Veuillez m’aider à me retrouver SVP. Je voudrais pouvoir supprimer des lignes de deux tableaux liés un seul userform.

Sur la feuille (DataBase), j’ai créé un grand tableau ( Tableau15) qui regroupe les données de plusieurs autres tableaux sur différentes feuilles ( vente, achat, transfert). J’utilise un userform pour ajouter des données et une ligne dans achat ( par exemple), ça envoie les mêmes données dans les colonnes qui concernent l’achat dans le tableau DataBase et mets zéro dans les autres colonnes qui concernent les autres ( Vente, transfert) sur la même ligne. Avec un userform je peux supprimer les données déjà ajouté dans le tableau achat mais je n’arrive pas a faire en sorte que la même suppression soit faite automatiquement dans le grand tableau (DataBase).

voici le code que j’utilise pour effectuer les suppressions:

Private Sub CmdSupprimer_Click()

If Me.LBDonneesAchat.ListIndex = -1 Then

    MsgBox "Veuillez choisir la ligne à supprimer", vbCritical, "STOCK"

ElseIf MsgBox("Voulez vous vraiment supprimé cette Achat?", vbYesNo, "demande de confirmation de suppression") = vbNo Then

If Me.LBDonneesAchat.ListIndex = -1 Then Exit Sub

Else

LigneAModifier = Me.LBDonneesAchat.ListIndex + 4

FeuilDonneesAchat.Rows(LigneAModifier).Delete

End If

End Sub

Voici un extrait du fichier :

https://www.cjoint.com/c/MEFmDptE647

Merci de bien vouloir m’aider 

A voir également:

7 réponses

Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
Modifié le 31 mai 2023 à 18:47

Bonjour,

Je vais me pencher sur votre demande.

Note: est-ce bien la ligne complète que l'on supprime     Oui/Non ?

         De plus y a t'il des formules sur la feuille DataBase   Oui/Non ?

Patience.


1
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
31 mai 2023 à 19:47

Bonjour. Merci d’avoir répond. oui c’est la ligne complète qu’on supprime. Oui y’a des formules dans les colonnes E,F et V

0
Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
1 juin 2023 à 15:20

Bonjour,

Votre fichier avec l'adaptation du code [Private Sub CmdSupprimer_Click()] concernant la feuille [Donnees_achat]

A vous la découverte: https://www.cjoint.com/c/MFbnqsEhpQZ


1
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
1 juin 2023 à 16:55

Bonjour. Merci pour votre réponse. Je viens de vérifier. Je sais pas mais ça n’a pas marché. J’ai ajouté une nouvelle entré dans Achat qui est aussi apparu dans le Database, mais quand je supprime ça se supprime dans l’achat uniquement. 

0
Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
1 juin 2023 à 22:40

Bonsoir,

Essayer celui-ci https://www.cjoint.com/c/MFbuL681j0Z

Je ne sais pas pourquoi le fichier se ferme tout seul c'est de la sorcellerie!!!


1
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
2 juin 2023 à 13:23

Bonjour merci beaucoup. Ça fonctionne!!!

J’ai mis trop de codes dedans afin d’atteindre mon objectif. Je pense que c’est pourquoi Ça bug parfois. Au début je croyais que c’était un problème de performance du PC mais même avec des machines performante, c’est pareil. Jai alors conclut que c’est Excel même qui n’est pas assez stable pour la gestion de données. Peut être que Access serait plus stable ???? Access qui n’est pas disponible sur office pour MacOS

0
Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
Modifié le 2 juin 2023 à 15:28

Bonjour,

Merci du retour, content pour vous.

Note: j'ai essayé le fichier sur un autre PC et cela fonctionne  4 fois et ensuite il se ferme toujours.

Ensuite j'ai transféré toutes les feuilles sur un nouveau classeur et le problème reste entier.

Finalement je pense qu'il y a une macro qui fait problème , mais je ne trouve pas laquelle!

Je pense qu’il serait bien de tout refaire à neuf et éventuellement, pour cette application, travailler avec des plages de données à la place des tableaux structurées.

Remarque : Excel est très bien pour votre application ; personnellement selon mes connaissances ce n’est pas pour Access .


1
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
2 juin 2023 à 17:52

D’accord. Merci pour la suggestion. Je vais faire comme vous le dîtes.

0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
2 juin 2023 à 18:37

Bonjour,

Je viens de trouver ou se produit le problème à la suite de la recherche de la dernière ligne puis lors du renseignement 

de la première valeur [TxCodeArticles] ......je vous donnerai réponse....Patience


1
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
2 juin 2023 à 20:16

Bonsoir. Super merci vraiment 

0
Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
1 juin 2023 à 21:44

Bonsoir,

Je vais regarder une nouvelle fois.

Note: le fichier se ferme tout seul à nouveau sans raison ...

Je dois trouver le problème avant de continuer.... peut -être dans les macros....?


0
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
1 juin 2023 à 23:53

Bonsoir. Merci pour la Mr Le Pingou. Lol pour éviter cela je vous ai envoyé directement le fichier que vous aviez vous même déjà amélioré.

je vais essayer la nouvelle que vous venez d’envoyer. Je vous ferais un retour demain IN shaAllah. Merci beaucoup. 

0
Le Pingou Messages postés 12047 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
3 juin 2023 à 11:06

Bonjour,

Je viens de découvrir un problème lors d’une modification [Modifier un Article] .Lorsque vous modifier par exemple le prix, la quantité et la date il est impossible de trouver le bon article puisqu’il peut être plusieurs fois dans le tableau de la feuille [DataBase] exemple ART-00003 écouteur sans fil y figure 3 fois.

Il est nécessaire que pour chaque mouvement Achats/Ventes vous attribuez un numéro d’enregistrement unique.

Concernant le disfonctionnement de la fermeture soudaine du classeur je ne poursuis pas , désolé .


0
Chackamadou Messages postés 24 Date d'inscription vendredi 14 février 2020 Statut Membre Dernière intervention 3 juin 2023 1
3 juin 2023 à 12:51

Bonjour. D’accord merci pour votre aide. Jai bien compris. Je m’y mets tout de suite. Bonne journée à vous Mr Le Pingou 

0