Bonjour à tous,

J'ai un petit soucis qui doit etre très stupide, mais je ne m'en sort pas!
J'ai des données dans un array et j'aimerais faire la somme de la 3eme colonne de cet array. Comment dois je porcéder? Voici mon code:

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
23
24
25
Sub test()
 
Dim nbre As Double
Dim i As Integer
Dim y As Integer
 
nbre = Cells(Rows.Count, 1).End(xlUp).Row
 
For i = 1 To nbre
 
If Cells(i, 3) = "USD" Then
 
ReDim KD(nbre, 3)
 
    KD(i, 1) = Cells(i, 2).Value
    KD(i, 2) = Cells(i, 4).Value
    KD(i, 3) = KD(i, 1) * KD(i, 2)
 
    range("SOMME")= '?????'''''''
 
 
End If
Next i
 
End Sub

Merci d'avance
Cordialement,