somme de 6 variables tableau

Version imprimable

bonsoir à vous,

je vous prie de me venir en aide;

en effet j'aimerai faire la somme de 6 variables tableaux de même dimension (ligne, colonne)

j'ai essayé de m'inspirer de la somme de 2 variables tableaux mais, le système me renvoie un erreur (j'arrive à renseigner les 6 tableaux, mais je bloque au moment de leur somme)

voila mon code:
Code:

1 2 3 4 5 6 7 8 9 Sub LoadSommeTablo() LoadLes6Tablo 'procedure qui remplis les 6 tableau For r = 1 To UBound(s) For c = 1 To UBound(s, 2) s(r, c) = t1(r, c) + t2(r, c) + t3(r, c) + t4(r, c) + t5(r, c) + t6(r, c) Next c Next r End Sub

Salut.

Sans voir les tableaux, il est malaisé de te donner une réponse. Les tableaux ont-ils les mêmes dimensions? Et surtout, Quel est le message d'erreur et sur quelle ligne ton code bloque-t-il?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub SumArray()
  Dim t1, t2, t3, t4, t5, t6, t7
  Dim C As Long
 
  t1 = VBA.Array(1, 5, 7, 9)
  t2 = VBA.Array(5, 8, 4, 3)
  t3 = VBA.Array(9, 7, 5, 6)
  t4 = VBA.Array(6, 7, 4, 3)
  t5 = VBA.Array(8, 6, 4, 9)
  t6 = VBA.Array(8, 6, 5, 2)
 
  ReDim t7(0 To UBound(t1))
  For C = 0 To UBound(t7)
    t7(C) = t1(C) + t2(C) + t3(C) + t4(C) + t5(C) + t6(C)
  Next C
End Sub

24/10/2019, 17h16
Benjohan2010

les tableaux ont les mêmes dimensions ( 32 lignes et 12 colonnes)

l'erreur c'est: "l'indice n'appartient pas à la sélection"

Bonsoir,

Exemple pour 2 Array() 2D

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub SommeArray()
  t1 = Evaluate("{1,2,3;4,5,6;7,8,9;10,11,12}")
  t2 = Evaluate("{2,3,4;5,6,7;8,9,10;11,12,13}")
  x1 = LBound(t1)
  x2 = LBound(t1, 2)
  Y1 = UBound(t1)
  y2 = UBound(t1, 2)
  ReDim c(x1 To Y1, x2 To y2)
  For i = x1 To Y1
    For j = x2 To y2
      c(i, j) = t1(i, j) + t2(i, j)
    Next j
  Next i
  [A1].Resize(Y1, y2) = c
End Sub

Boisgontier

25/10/2019, 08h28
Menhir

Citation:

Envoyé par Benjohan2010

les tableaux ont les mêmes dimensions ( 32 lignes et 12 colonnes)
l'erreur c'est: "l'indice n'appartient pas à la sélection"

Dans ton code, tes variables ne sont ni déclarées ni renseignées en tant que tableau.
Donc, par défaut, elles sont une dimension 0 et ne peuvent pas avoir d'indice.

On ne peut pas donner d'indice à une variable qui n'en a pas.