Macro sous conditions

Atiom · 24 Décembre 2008

Bonsoir le forum

Je souhaiterais avoir un petit coup de main pour une macro.

Je souhaiterais obtenir une somme des colonnes dans une plage, mais sous la condition de la colonne B.

Je mets une petite pièce jointe avec plus de détails.

Merci de votre aide

kjin · 24 Décembre 2008

Re : Macro sous conditions

Bonsoir,
Une solution simple

Code:

Sub SomColonne()
For i = 11 To [B65000].End(xlUp).Row
    Range("N" & i) = Application.Sum(Range("D" & i), Range("F" & i & ":H" & i), Range("J" & i & ":K" & i))
Next
End Sub

A+
kjin

tototiti2008 · 24 Décembre 2008

Re : Macro sous conditions

Bonjour Atiom,

à tester :

Code:

Sub SommeListe()
Dim i  As Long
    For i = 11 To ActiveSheet.Range("B65536").End(xlUp).Row
        ActiveSheet.Range("N" & i).Value = Application.WorksheetFunction.Sum(ActiveSheet.Range("D" & i & ",F" & i & ":H" & i & ",J" & i & ":K" & i))
    Next i
End Sub

Edit : Bonjour kjin, même inspiration 😉

Atiom · 24 Décembre 2008

Re : Macro sous conditions

Bonsoir,

Impeccable.
Les deux solutions fonctionnement parfaitement
Merci vos deux.🙂

Bonne nuit bonne fête de fin d’année.

Macro sous conditions

Atiom

XLDnaute Occasionnel

Pièces jointes

kjin

XLDnaute Barbatruc

tototiti2008

XLDnaute Barbatruc

Atiom

XLDnaute Occasionnel

Discussions similaires

Macro sous conditions

Atiom

XLDnaute Occasionnel

Pièces jointes

kjin

XLDnaute Barbatruc

tototiti2008

XLDnaute Barbatruc

Atiom

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency