Fusionner plusieurs ligne tout en additionant une colonne ?

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #2

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Bonjour
Oui c'est possible .....
Mais sans le fichier..........
A++

 

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #3

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Comment il faut faire ?

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #4

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

RE
Tu apuis sur aller en mode avancé ;la tu fais gérer les pièces jointes ; et tu envoi ton fichier avec données minimum de donnée ( le plus anonyme possible)
Et voilou
A++

 

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #5

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Tu parles bien sur Excel ?

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #6

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Re
Dialogue de sourd clavier;
Tu joint ton fichier excel et là tu aura certainement un réponses à ton problème............
A++

 

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #7

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Voila ce que j'aimerais c'est fusionner ces deux lignes et de cumuler les deux montants

Sanstitre - HostingPics.net - Hbergement d'images gratuit

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #8

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Rebonjour
Voici un bout de code ;mais sans fichier ;une photo c'est un peu compliqué
Mais bon essaye ce code et redit

Voir fichier ci dessous

Cliquez pour agrandir...

A++

 

Dernière édition: 21 Décembre 2011

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #9

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Voila un bou du fichier. Car j'ai un peu du mal avec le code...

 

Pièces jointes

• Classeur1.xlsx

  8.4 KB · Affichages: 58
• Classeur1.xlsx

  8.4 KB · Affichages: 54
• Classeur1.xlsx

  8.4 KB · Affichages: 61

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #10

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Re
Voici ton fichier avec le code
A++

 

Pièces jointes

• AlexTerre.xls

  35.5 KB · Affichages: 64

Dernière édition: 21 Décembre 2011

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #11

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

comment utiliser ton macro sur mon fichier maintenant ?

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #12

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

RE
Est ce que déjà tes colonnes sont formatté à l'identique que l'exemple que tu as envoyé.
Si oui; alors tu copies ma macro ;que tu colles dans un module de ton fichier
A++

 

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #13

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

J'ai reussi a integrer le macro mais est il possible de m'en faire un nouveau avec ce modele la ? Merci beaucoup

 

Pièces jointes

• Classeur1.xlsx

  9 KB · Affichages: 55
• Classeur1.xlsx

  9 KB · Affichages: 60
• Classeur1.xlsx

  9 KB · Affichages: 57

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 21 Décembre 2011

• #14

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Re
Voici le code pour ton dernière exemple

Sub supprimeDoublonsEtcompte()


Dim data As New Collection
Dim tablo()
Dim c As Range
Dim i As Integer
Dim plage1 As Range
Dim plage2 As Range

Set plage1 = Range("c2:c" & Range("c65536").End(xlUp).Row)
Set plage2 = Range("e2:e" & Range("e65536").End(xlUp).Row)

On Error Resume Next
For Each c In plage2
data.Add c, CStr(c)
Next c
On Error GoTo 0

ReDim tablo(1 To data.Count, 1 To 2)

For i = 1 To data.Count
tablo(i, 1) = data(i)
tablo(i, 2) = Application.SumIf(plage2, data(i), plage1)
Next i

Range("j2").Resize(UBound(tablo, 1), 2) = tablo
End Sub

Cliquez pour agrandir...

A++

Ps:Je pense que tu as compris de l’intérêt de mettre un fichier avec exactement ce qu'on veut; çà peut gagner du temps!!!!!!!!!
Allez je te sert un petit jura de chez moi et boit à ta bonne santé

 

Vote positif 0 Vote négatif

A

alexterre

Guest

• 21 Décembre 2011

• #15

Re : Fusionner plusieurs ligne tout en additionant une colonne ?

Excuse moi roro , mais entre temps j'ai edité le fichier . Cela ne marche donc pas . Si tu peux me le modifier une derniere fois 🙂 Mille merci en tout cas . Tu me fais gagner un temp fou

 

Vote positif 0 Vote négatif