Salut,

Voilà un autre soucis : je pensais que se serait plus simple que cela mais finalement....

Le soucis c'est que je veux faire la somme de ma colonne "D" dans ma woorksheet("impression") sauf que là je rame et je rame.

J'aimerais que se résultat se trouve en dessous de mon tableau de ma woorksheet("impression").

Le fonctionnement en gors de mon code c'est: je vais selectionner les valeurs sélectionné dans woorksheet("base") pour les ammener dans la woorksheet("impression") ensuite je prend la colonne D qui represente des coût et j'en fais la somme. Voili voilou


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
LaDerniere = Worksheets("Base").Cells(6556, 2).End(xlUp).Row
For i = 2 To LaDerniere
 
If ComboBox2.Value = "" And ComboBox3.Value = "" And ComboBox4.Value = "" Then
K = 4
    If Worksheets("Base").Cells(i, 1) = ComboBox1.Value Then
    Worksheets("Base").Range("B" & i & ":F" & i & "").Copy
    Worksheets("impression").Range("B" & K & "").Select
    ActiveSheet.Paste
    Worksheets("impression").Range("A2") = "Section : " & ComboBox1.Value
    Range("A2").Select
    With Selection.Interior
        .ColorIndex = 40
        .Pattern = xlSolid
    End With
    Worksheets("Base").Range("B1:D1").Copy
    Worksheets("impression").Range("B3:D3").Select
    ActiveSheet.Paste
 
 
    K = K + 1
    End If