Macro qui suprime un doublon et additionne les quantité
Résolu/Fermé
Hamster18
Messages postés
185
Date d'inscription
mercredi 2 janvier 2019
Statut
Membre
Dernière intervention
8 février 2023
-
30 déc. 2020 à 15:04
Hamster18 Messages postés 185 Date d'inscription mercredi 2 janvier 2019 Statut Membre Dernière intervention 8 février 2023 - 6 janv. 2021 à 18:23
Hamster18 Messages postés 185 Date d'inscription mercredi 2 janvier 2019 Statut Membre Dernière intervention 8 février 2023 - 6 janv. 2021 à 18:23
A voir également:
- Macro qui suprime un doublon et additionne les quantité
- Macro logiciel - Télécharger - Organisation
- Chaque fois qu’un vendeur vend un produit à un client, il inscrit une nouvelle ligne avec la quantité de produit vendu. quels sont, dans l'ordre, les 3 produits les plus vendus par stéphane (en quantité, tous clients confondus) ? ✓ - Forum Excel
- Supprimer doublon excel - Guide
- Macro recorder - Télécharger - Confidentialité
- Logiciel doublon photo - Guide
4 réponses
M-12
Messages postés
1329
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
10 mars 2023
294
30 déc. 2020 à 20:18
30 déc. 2020 à 20:18
Re,
Faudrait peut -être savoir lequel
Comme il n'y avait qu'une image pour la demande!!
Faudrait peut -être savoir lequel
Comme il n'y avait qu'une image pour la demande!!
M-12
Messages postés
1329
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
10 mars 2023
294
30 déc. 2020 à 17:31
30 déc. 2020 à 17:31
Bonjour,
A tester avec cet exemple
https://mon-partage.fr/f/WvvzMu1Q/
A tester avec cet exemple
https://mon-partage.fr/f/WvvzMu1Q/
Hamster18
Messages postés
185
Date d'inscription
mercredi 2 janvier 2019
Statut
Membre
Dernière intervention
8 février 2023
6 janv. 2021 à 18:23
6 janv. 2021 à 18:23
Bonjour,
Je sais que la "question" est fermer mais je tente quand même le coup ...
J'essaie actuellement d’améliorer le code que vous m'avait donner ...
J'en suis à un point ou j'aimerais que le début de ma liste à trier soit modulable. Je veux dire que la lisre peut commencer en A6 puis en A36 puis en A100 ....
J'ai essayer les code suivant :
Cepandant le [A6] de
Auriez vous une solution ?
Merci d'avance de votre réponse.
Cordialement.
Je sais que la "question" est fermer mais je tente quand même le coup ...
J'essaie actuellement d’améliorer le code que vous m'avait donner ...
J'en suis à un point ou j'aimerais que le début de ma liste à trier soit modulable. Je veux dire que la lisre peut commencer en A6 puis en A36 puis en A100 ....
J'ai essayer les code suivant :
Sub supprimerDoublonTotauxTEMPORAIRE(nb As Integer)
Dim ligne%
Dim var
Let var = "A" & nb
Set rng2 = Worksheets("tableauRecap").Range(var)
'Worksheets("tableauRecap").[A6].CurrentRegion.Sort , Key1:=[rng2], Header:=xlYes
ligne = nb
Do While Cells(ligne, 1) <> ""
If Worksheets("tableauRecap").Cells(ligne, 1) = Worksheets("tableauRecap").Cells(ligne + 1, 1) And Worksheets("tableauRecap").Cells(ligne, 2) = Worksheets("tableauRecap").Cells(ligne + 1, 2) And Worksheets("tableauRecap").Cells(ligne, 3) = Worksheets("tableauRecap").Cells(ligne + 1, 3) And Worksheets("tableauRecap").Cells(ligne, 4) = Worksheets("tableauRecap").Cells(ligne + 1, 4) And Worksheets("tableauRecap").Cells(ligne, 6) = Worksheets("tableauRecap").Cells(ligne + 1, 6) And Worksheets("tableauRecap").Cells(ligne, 7) = Worksheets("tableauRecap").Cells(ligne + 1, 7) Then
Worksheets("tableauRecap").Cells(ligne, "E") = Worksheets("tableauRecap").Cells(ligne, "E") + Worksheets("tableauRecap").Cells(ligne + 1, "E")
Worksheets("tableauRecap").Cells(ligne, "G") = Worksheets("tableauRecap").Cells(ligne, "G") + Worksheets("tableauRecap").Cells(ligne + 1, "G")
Rows(ligne + 1).Delete
Else
ligne = ligne + 1
End If
Loop
Cepandant le [A6] de
'Worksheets("tableauRecap").[A6].CurrentRegion.Sort , Key1:=[rng2], Header:=xlYes ne peut pas être modifier de la manière suivant [rng2]
Auriez vous une solution ?
Merci d'avance de votre réponse.
Cordialement.
Hamster18
Messages postés
185
Date d'inscription
mercredi 2 janvier 2019
Statut
Membre
Dernière intervention
8 février 2023
30 déc. 2020 à 19:04
30 déc. 2020 à 19:04
Bonjour,
As tu fais quelque chose de spéciale à tout fichier car quand je reprends sur ton fichier ça marche mais pas avec l'excel sur lequel je travail.
Merci d’avance de ta réponse.
Cordialement.
As tu fais quelque chose de spéciale à tout fichier car quand je reprends sur ton fichier ça marche mais pas avec l'excel sur lequel je travail.
Merci d’avance de ta réponse.
Cordialement.
Hamster18
Messages postés
185
Date d'inscription
mercredi 2 janvier 2019
Statut
Membre
Dernière intervention
8 février 2023
30 déc. 2020 à 21:38
30 déc. 2020 à 21:38
Bonjour,
Pas de problème après plusieurs testes j'ai trouver d’où cela venais. C'est le trie qui ne se fait pas de la même manière dans votre fonction et mon premier tri. A cela s'ajoute des problèmes de format qu'ils faut au préalable supprimer... mais c'est bon j'ai trouver comment corriger tous ça !
Merci beaucoup de votre aide !!
Cordialement.
Pas de problème après plusieurs testes j'ai trouver d’où cela venais. C'est le trie qui ne se fait pas de la même manière dans votre fonction et mon premier tri. A cela s'ajoute des problèmes de format qu'ils faut au préalable supprimer... mais c'est bon j'ai trouver comment corriger tous ça !
Merci beaucoup de votre aide !!
Cordialement.

